#!usr/bin/perl

use LWP::Simple;

getprint($ARGV[0]);

exit;