Help for this page

Select Code to Download

Select or download this

my $line = $_[0];
my $line = shift;
(my $line) = @_;