Help for this page

Select Code to Download


  1. or download this
    >type 754047.pl
$value =~ s/\D//g;
...
>perl -c 754047.pl
syntax error at 754047.pl line 3, near "){"
754047.pl had compilation errors.
  2. or download this
    my $value = "abc456def";

...
$value = m/(\d+)/;

print "$value\n";   # Prints 1, not 456
  3. or download this
    my $value = "abc456def";

...
($value) = m/(\d+)/;

print "$value\n";   # Prints 456
  4. or download this
    my $value = "abc456def";

($value) = $value =~ m/(\d+)/;

print "$value\n";   # Prints 456