in reply to [SOLVED]Unable to split $ARGV[0] variable. Can it be done?
perl getrequest.pm http://www.google.com my $url = $ARGV[0]; my ($host)=$url=~/https?:\/\/([^\/]+)/;
print "Good ",qw(night morning afternoon evening)[(localtime)[2]/6]," fellow monks."
|
|---|
In Section
Seekers of Perl Wisdom