Help for this page

Select Code to Download


  1. or download this
    $output = qx/ls/ ;
print $output ;
  2. or download this
    use Win32::Script qw/WScript/ ;
$output = WScript('Shell')->Exec("ls")->StdOut->ReadAll ;
print $output ;
  3. or download this
    <SCRIPT language="PerlScript">
    $output = qx/ls/ ;
    $window->document->write($output) ;
</SCRIPT>
  4. or download this
    <SCRIPT language="PerlScript">
    use Win32::Script qw/WScript/ ;
    $output = WScript('Shell')->Exec("ls")->StdOut->ReadAll ;
    $window->document->write($output) ;
</SCRIPT>
  5. or download this
    <SCRIPT language="PerlScript">
    qx/ls > output.txt/ ;
</SCRIPT>