3 my @argv = ("valgrind");
6 while (my $arg = shift) {
7 print "arg($count)$arg\n";
19 #print "COMMAND : $bin $option $cd $path\n";
21 #print "valgrind --trace-children=yes --leak-check=full --show-reachable=yes --track-origins=yes --read-var-info=no $bin $option\n";