#!/usr/local/bin/perl
$str = qx'ls /usr/local/bin';
print "$str\n";