=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== colplot-5.2.0/colplot-74- my $command="echo 'set terminal x11'|$mycfg->{GnuPlot} 2>&1"; colplot-5.2.0/colplot:75: my $result=`$command`; colplot-5.2.0/colplot-76- $x11Flag=($result=~/unknown or ambiguous/) ? 0 : 1; colplot-5.2.0/colplot-77- $command="echo 'set terminal png'|$mycfg->{GnuPlot} 2>&1"; colplot-5.2.0/colplot:78: $result=`$command`; colplot-5.2.0/colplot-79- $pngFlag=($result=~/unknown or ambiguous/) ? 0 : 1; ############################################## colplot-5.2.0/colplot-500- colplot-5.2.0/colplot:501: foreach my $addr (@addresses) colplot-5.2.0/colplot-502- { ############################################## colplot-5.2.0/colplot-513- displayText($mycfg, "REMOTE: $command") if $debug & 8; colplot-5.2.0/colplot:514: my @hrefs=`$command`; colplot-5.2.0/colplot-515- foreach my $href (@hrefs) ############################################## colplot-5.2.0/colplot-816- { colplot-5.2.0/colplot:817: my $contents=`cat $pngFile`; colplot-5.2.0/colplot-818- print "Content-type: image/png\n\n"; ############################################## colplot-5.2.0/colplot-865- colplot-5.2.0/colplot:866: my $contents=`$command`; colplot-5.2.0/colplot-867- print "Content-type: image/png\n\n"; ############################################## colplot-5.2.0/colplot-1103- printText("Command: $command") if $debug & 1; colplot-5.2.0/colplot:1104: `$command`; colplot-5.2.0/colplot-1105- colplot-5.2.0/colplot-1106- printText("Your Plot(s) have been mailed to $email with a subject of \"$subject\"", 3); colplot-5.2.0/colplot:1107: `$mycfg->{del} $mycfg->{tempdir}$$-*` unless $debug & 4; colplot-5.2.0/colplot-1108- } ############################################## colplot-5.2.0/colplotlib.ph-168- { colplot-5.2.0/colplotlib.ph:169: my $temp=`echo show version | $gnuPlot 2>&1`; colplot-5.2.0/colplotlib.ph-170- $temp=~/[vV]ersion (\d+\.\d+)/; ############################################## colplot-5.2.0/colplotlib.ph-174- $mycfg->{fontSize}='small'; colplot-5.2.0/colplotlib.ph:175: $temp=`(echo set terminal png ; echo show terminal) | $gnuPlot 2>&1`; colplot-5.2.0/colplotlib.ph-176- $mycfg->{fontSize}='medium' if $temp=~/medium/; ############################################## colplot-5.2.0/colplotlib.ph-578- $range=~s/-/../g; colplot-5.2.0/colplotlib.ph:579: my @numbers=eval("($range)"); colplot-5.2.0/colplotlib.ph-580- foreach my $number (@numbers) ############################################## colplot-5.2.0/colplotlib.ph-1051- displayText($mycfg, "Command: $command") if $debug & 1; colplot-5.2.0/colplotlib.ph:1052: `$command`; colplot-5.2.0/colplotlib.ph-1053- ############################################## colplot-5.2.0/colplotlib.ph-1055- displayText($mycfg, "Command: $command") if $debug & 1; colplot-5.2.0/colplotlib.ph:1056: `$command`; colplot-5.2.0/colplotlib.ph-1057- } ############################################## colplot-5.2.0/colplotlib.ph-1067- displayText($mycfg, "Command: $command") if $debug & 1; colplot-5.2.0/colplotlib.ph:1068: `$command`; colplot-5.2.0/colplotlib.ph-1069- ############################################## colplot-5.2.0/colplotlib.ph-1071- displayText($mycfg, "Command: $command") if $debug & 1; colplot-5.2.0/colplotlib.ph:1072: `$command`; colplot-5.2.0/colplotlib.ph-1073- } ############################################## colplot-5.2.0/colplotlib.ph-1082- displayText($mycfg, "Command: $command") if $debug & 1; colplot-5.2.0/colplotlib.ph:1083: `$command`; colplot-5.2.0/colplotlib.ph-1084- $attach="$tarFile"; ############################################## colplot-5.2.0/colplotlib.ph-1094- displayText($mycfg, "Command: $command") if $debug & 1; colplot-5.2.0/colplotlib.ph:1095: `$command`; colplot-5.2.0/colplotlib.ph-1096- $attach="$tarname"; ############################################## colplot-5.2.0/colplotlib.ph-1432- $filter=~s/-/../; colplot-5.2.0/colplotlib.ph:1433: my @cpus=eval("($filter)"); colplot-5.2.0/colplotlib.ph-1434- ############################################## colplot-5.2.0/colplotlib.ph-1757- displayText($mycfg, "Command: $command") if $debug & 1; colplot-5.2.0/colplotlib.ph:1758: `$command`; colplot-5.2.0/colplotlib.ph-1759- unlink $gnuCtlFile unless $debug & 4 || $pparams->{incctl}; ############################################## colplot-5.2.0/colplotlib.ph-1767- displayText($mycfg, "Command: $command") if $debug & 1; colplot-5.2.0/colplotlib.ph:1768: `$command`; colplot-5.2.0/colplotlib.ph-1769- unlink $psFile; ############################################## colplot-5.2.0/colplotlib.ph-2368- displayText($mycfg, "Command: $command") if $debug & 1; colplot-5.2.0/colplotlib.ph:2369: system($command); colplot-5.2.0/colplotlib.ph-2370- ############################################## colplot-5.2.0/colplotlib.ph-2377- # we need to make png file readable as well as deleteable colplot-5.2.0/colplotlib.ph:2378: `chmod a+wr $pngFile` if !$pcFlag && $filetype!~/tty/; colplot-5.2.0/colplotlib.ph-2379- } ############################################## colplot-5.2.0/colplotlib.ph-2939- my $addressList=''; colplot-5.2.0/colplotlib.ph:2940: foreach my $addr (split(/[ ,]/, $address)) colplot-5.2.0/colplotlib.ph-2941- { ############################################## colplot-5.2.0/colplotlib.ph-2995- colplot-5.2.0/colplotlib.ph:2996: my @numbers=eval("($piece)"); colplot-5.2.0/colplotlib.ph-2997-