Help for this page

Select Code to Download


  1. or download this
    my $argument = $ARGV[0] || (print( "Parameter? "), (<>)[0]);
chomp $argument;
  2. or download this
    my $argument = $ARGV[0] || (print( "Parameter? "), <>);
chomp $argument;