Select Code to Download

$foo="ID_106";
system("perl split.pl $foo");

$bar=$ARGV[0]; (the argument input, so now $bar="ID_106")
$var=system("grep -A 1 $bar *.txt");
print $var;