use strict;
use warnings;
my $output = qx(date);
print $output;