Select Code to Download

#! /usr/bin/perl -w
print $ARGV[0];

$ test.pl Hello
Hello

echo "Hello" | test.pl
Use of uninitialized value in print at ./test.pl line 2