Select Code to Download

my $result = `ls /home`;
print $result;

system('cp /tmp/foo /tmp/bar') || die "Can't run command";