===========================================================
                                      .___ __  __   
          _________________  __ __  __| _/|__|/  |_ 
         / ___\_` __ \__  \ |  |  \/ __ | | \\_  __\
        / /_/  >  | \// __ \|  |  / /_/ | |  ||  |  
        \___  /|__|  (____  /____/\____ | |__||__|  
       /_____/            \/           \/           
              grep rough audit - static analysis tool
                  v2.8 written by @Wireghoul
=================================[justanotherhacker.com]===
cons-2.3.0.1+2.2.0/cons.bat-751-		my($_foo, $script, $line, $sub) = @$cref;
cons-2.3.0.1+2.2.0/cons.bat:752:		$where = " ($sub in $script, line $line)";
cons-2.3.0.1+2.2.0/cons.bat-753-	    }
##############################################
cons-2.3.0.1+2.2.0/cons.bat-796-    foreach $dir (@_) {
cons-2.3.0.1+2.2.0/cons.bat:797:	my($d) = `$^X -e "use Cwd; chdir('$dir') && print cwd"`;
cons-2.3.0.1+2.2.0/cons.bat-798-	next if ! $d || ! -d $d || $d eq $my_dir;
##############################################
cons-2.3.0.1+2.2.0/cons.bat-1510-	  if ($main::_WIN32) {
cons-2.3.0.1+2.2.0/cons.bat:1511:	    system($com);
cons-2.3.0.1+2.2.0/cons.bat-1512-	    if ($?) {
##############################################
cons-2.3.0.1+2.2.0/cons.bat-1526-	      # warnings about not reaching the statements afterwards.
cons-2.3.0.1+2.2.0/cons.bat:1527:	      eval 'exec($com)';
cons-2.3.0.1+2.2.0/cons.bat-1528-	      $com =~ s/\s.*//;
##############################################
cons-2.3.0.1+2.2.0/cons-717-		my($_foo, $script, $line, $sub) = @$cref;
cons-2.3.0.1+2.2.0/cons:718:		$where = " ($sub in $script, line $line)";
cons-2.3.0.1+2.2.0/cons-719-	    }
##############################################
cons-2.3.0.1+2.2.0/cons-762-    foreach $dir (@_) {
cons-2.3.0.1+2.2.0/cons:763:	my($d) = `$^X -e "use Cwd; chdir('$dir') && print cwd"`;
cons-2.3.0.1+2.2.0/cons-764-	next if ! $d || ! -d $d || $d eq $my_dir;
##############################################
cons-2.3.0.1+2.2.0/cons-1476-	  if ($main::_WIN32) {
cons-2.3.0.1+2.2.0/cons:1477:	    system($com);
cons-2.3.0.1+2.2.0/cons-1478-	    if ($?) {
##############################################
cons-2.3.0.1+2.2.0/cons-1492-	      # warnings about not reaching the statements afterwards.
cons-2.3.0.1+2.2.0/cons:1493:	      eval 'exec($com)';
cons-2.3.0.1+2.2.0/cons-1494-	      $com =~ s/\s.*//;