Help for this page

Select Code to Download


  1. or download this
    $string =~ s/^.*[.]//;
  2. or download this
    $string =~ s/^.*(?:[.]([^.]*))?$/$2/;
  3. or download this
    my ($extension) = $string =~ /[.]([^.]*)$/;