#!/usr/bin/perl

use warnings;
use strict;

my $string = $ARGV[0];

#print "$string";

my $rc = `$string`;
print $rc;