=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== libfile-path-tiny-perl-0.9/t/01.symtogsafe.t-87- # use system call since the perl to do this will likely use File::Spec libfile-path-tiny-perl-0.9/t/01.symtogsafe.t:88: system("/bin/mkdir -p moved/$func/$parent") and die "could not toggle dir/symlink (mkdir): $?\n"; libfile-path-tiny-perl-0.9/t/01.symtogsafe.t-89- } ############################################## libfile-path-tiny-perl-0.9/t/01.symtogsafe.t-91- # use system call since the perl to do this will likely use File::Spec libfile-path-tiny-perl-0.9/t/01.symtogsafe.t:92: system("/bin/mv $dir/$func/$toggle $dir/moved/$func/$toggle") and die "could not toggle dir/symlink (mv): $?\n"; libfile-path-tiny-perl-0.9/t/01.symtogsafe.t-93- symlink( "$dir/victim", "$dir/$func" . ( $toggle ? "/$toggle" : "" ) ) or die "could not toggle dir/symlink (sym): $!\n";