Help for this page

Select Code to Download


  1. or download this
    my $p = "$2$1";       # my $p = $2.$1;
                      # Doesn't change the value of $2 or $1.
  2. or download this
    my $p = "$ARGV[0]";   # my $p = "".$ARGV[0];
                      # Doesn't change the value of $ARGV[0].
  3. or download this
    use String::Interpolate qw( interpolate);

...
my $t = $ARGV[0];

my $p = interpolate($t);