=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== libdate-manip-perl-6.82/lib/Date/Manip/DM5.pm-41-#if ($] < 5.0080) { libdate-manip-perl-6.82/lib/Date/Manip/DM5.pm:42: $Date::Manip::DM5::NoTaint = eval { local $^W=0; eval("#" . substr($^X, 0, 0)); 1 }; libdate-manip-perl-6.82/lib/Date/Manip/DM5.pm-43-#} else { ############################################## libdate-manip-perl-6.82/lib/Date/Manip/Changes6.pod-1252- libdate-manip-perl-6.82/lib/Date/Manip/Changes6.pod:1253:Fixed a bug where '$base2 = new Date::Manip::Base $base1' wasn't working. RT 67143 libdate-manip-perl-6.82/lib/Date/Manip/Changes6.pod-1254- ############################################## libdate-manip-perl-6.82/Changes-890- libdate-manip-perl-6.82/Changes:891: Fixed a bug where '$base2 = new Date::Manip::Base $base1' wasn't libdate-manip-perl-6.82/Changes-892- working. RT 67143 ############################################## libdate-manip-perl-6.82/internal/benchmarks/dm5dm6_ex3-13- libdate-manip-perl-6.82/internal/benchmarks/dm5dm6_ex3:14:my @dates = `cat $file`; libdate-manip-perl-6.82/internal/benchmarks/dm5dm6_ex3-15-chomp(@dates); ############################################## libdate-manip-perl-6.82/internal/dumps-8-for file in `cd tzdata/dump; echo *` ;do libdate-manip-perl-6.82/internal/dumps:9: tz=`head -1 tzdata/dump/$file | awk '{print $1}'` libdate-manip-perl-6.82/internal/dumps-10- echo "##########################################################" ############################################## libdate-manip-perl-6.82/internal/dumps-15- perl -I./lib examples/dm_zdump -v $tz | egrep -v '0001|9999' > z.dump.new libdate-manip-perl-6.82/internal/dumps:16: ln=`wc -l z.dump.new | awk '{print $1}'` libdate-manip-perl-6.82/internal/dumps-17- ############################################## libdate-manip-perl-6.82/internal/dumps-20- tail --lines=+3 tzdata/dump/$file | head --lines=-2 > z.dump.old libdate-manip-perl-6.82/internal/dumps:21: lo=`wc -l z.dump.old | awk '{print $1}'` libdate-manip-perl-6.82/internal/dumps-22- ############################################## libdate-manip-perl-6.82/internal/windows.compare-88- libdate-manip-perl-6.82/internal/windows.compare:89: my @lines = `cat $file`; libdate-manip-perl-6.82/internal/windows.compare-90- chomp(@lines); ############################################## libdate-manip-perl-6.82/internal/windows.compare-118- libdate-manip-perl-6.82/internal/windows.compare:119:# my @lines = `cat $file`; libdate-manip-perl-6.82/internal/windows.compare-120-# chomp(@lines); ############################################## libdate-manip-perl-6.82/internal/tzdata-160- libdate-manip-perl-6.82/internal/tzdata:161: system("tar xzf $tzdata_data"); libdate-manip-perl-6.82/internal/tzdata-162- my $tzdata_vers = _release('data'); libdate-manip-perl-6.82/internal/tzdata-163- libdate-manip-perl-6.82/internal/tzdata:164: system("tar xzf $tzdata_code"); libdate-manip-perl-6.82/internal/tzdata-165- my $tzcode_vers = _release('code'); ############################################## libdate-manip-perl-6.82/internal/tzdata-178- } libdate-manip-perl-6.82/internal/tzdata:179: my $vers = `grep Release NEWS | head -1 | awk '{print \$2}'`; libdate-manip-perl-6.82/internal/tzdata-180- chomp($vers); ############################################## libdate-manip-perl-6.82/internal/tzdata-183- } libdate-manip-perl-6.82/internal/tzdata:184: system("mv NEWS NEWS.$type"); libdate-manip-perl-6.82/internal/tzdata-185- return $vers; ############################################## libdate-manip-perl-6.82/internal/tzdata-217- foreach my $file (@Date::Manip::TZdata::StdFiles) { libdate-manip-perl-6.82/internal/tzdata:218: my @tmp = `grep '^Zone' tzdata/$file | awk '{print \$2}'`; libdate-manip-perl-6.82/internal/tzdata-219- chomp(@tmp); ############################################## libdate-manip-perl-6.82/internal/tzdata-346- my $tzd = Date::Manip::TZdata->new(); libdate-manip-perl-6.82/internal/tzdata:347: system("rm -f $mod_dir/*"); libdate-manip-perl-6.82/internal/tzdata-348- ############################################## libdate-manip-perl-6.82/internal/tzdata-523- libdate-manip-perl-6.82/internal/tzdata:524: my @lines = `cat tzdata/dump/$module`; libdate-manip-perl-6.82/internal/tzdata-525- chomp(@lines); ############################################## libdate-manip-perl-6.82/internal/tzdata-1225- libdate-manip-perl-6.82/internal/tzdata:1226: system("rm -f $off_dir/*"); libdate-manip-perl-6.82/internal/tzdata-1227- foreach my $offset (sort keys %offset2_or) {