my $cmd = system("find . type f -name \"fname*\")
my $cmd = `ls -l`;