Why would you use the shift function in the following:
my $file = shift || 'foo.html'; open INFILE, '<', $file, or die "$!: can't open $file\n"; [download]
In reply to Shift function and file opening by Tricky