use strict;

my $info = `systeminfo`;

print "I got the following information:\n";
print "***$info***\n";