#! /usr/local/bin/perl -w use strict; my $thing = shift || 'world'; print "Hello, $thing\n";