通过反引号句柄执行系统命令

use strict;
use warnings;

my $var="something";

print "fileis ",__FILE__," line on ",__LINE__,"\n";

print <<`SHELL`;
echo $var
date
[ -e /data ] && echo "/data dir is exist!"
SHELL