$
$
$ # Run a command first and check its output
$
$ ls f1
f1
$
$ # Now run this command from within Perl, and using "system" function
$
$ perl -le 'system ("ls f1")'
f1
$
$ # Try to assign the command output to a Perl variable
$
$ perl -le '$x = system ("ls f1"); print "\$x = $x"'
f1
$x = 0
$
$
$ # The first line is the actual output; the second line is the value of $x
$ # which in turn is the exit status of the command
$
$ # Use backticks to assign the output in Perl
$
$ perl -le '$x = `ls f1`; print "\$x = $x"'
$x = f1
 
$
$
$ # You can also use qx// function
$
$ perl -le '$x = qx/ls f1/; print "\$x = $x"'
$x = f1
 
$
$