=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== liburi-perl-5.05/t/storable.t-6- liburi-perl-5.05/t/storable.t:7:system($^X, "-Iblib/lib", "t/storable-test.pl", "store"); liburi-perl-5.05/t/storable.t:8:system($^X, "-Iblib/lib", "t/storable-test.pl", "retrieve"); liburi-perl-5.05/t/storable.t-9- ############################################## liburi-perl-5.05/t/old-base.t-18-unless ($^O eq "MacOS") { liburi-perl-5.05/t/old-base.t:19:chomp(my $pwd = ($^O =~ /mswin32/i ? `cd` : $^O eq 'VMS' ? `show default` : `pwd`)); liburi-perl-5.05/t/old-base.t-20-if ($^O eq 'VMS') { ############################################## liburi-perl-5.05/t/old-base.t-616- if ( $^O eq 'qnx' ) { liburi-perl-5.05/t/old-base.t:617: $tmpdir = `/usr/bin/fullpath -t $tmpdir`; liburi-perl-5.05/t/old-base.t-618- chomp $tmpdir; ############################################## liburi-perl-5.05/t/old-base.t-622- liburi-perl-5.05/t/old-base.t:623: my $savedir = `$pwd`; # we don't use Cwd.pm because we want to check liburi-perl-5.05/t/old-base.t-624- # that it get require'd correctly by URL.pm ############################################## liburi-perl-5.05/t/old-base.t-633- chdir($tmpdir) or die $!; liburi-perl-5.05/t/old-base.t:634: my $dir = `$pwd`; $dir =~ tr|\\|/|; liburi-perl-5.05/t/old-base.t-635- chomp $dir; ############################################## liburi-perl-5.05/t/old-base.t-661- chdir($tmpdir) or fail $!; liburi-perl-5.05/t/old-base.t:662: $dir = `$pwd`; $dir =~ tr|\\|/|; liburi-perl-5.05/t/old-base.t-663- chomp $dir; ############################################## liburi-perl-5.05/t/old-base.t-675- chdir($tmpdir) or fail $!; liburi-perl-5.05/t/old-base.t:676: $dir = `$pwd`; $dir =~ tr|\\|/|; liburi-perl-5.05/t/old-base.t-677- chomp $dir; ############################################## liburi-perl-5.05/t/old-base.t-690- chdir('/') or fail $!; liburi-perl-5.05/t/old-base.t:691: $dir = `$pwd`; $dir =~ tr|\\|/|; liburi-perl-5.05/t/old-base.t-692- chomp $dir; ############################################## liburi-perl-5.05/lib/URI/file.pm-145-and returns it. The $filename is interpreted as belonging to the liburi-perl-5.05/lib/URI/file.pm:146:indicated operating system ($os), which defaults to the value of the liburi-perl-5.05/lib/URI/file.pm-147-$^O variable. The $filename can be either absolute or relative, and