$result = system "perl first_prog.pl"
print $result;
#I get 256