Help for this page

Select Code to Download


  1. or download this
    my $substring = (split /\n/, $tmp)[-1];
    
  2. or download this
    my ($substring) = $tmp =~ /\n(.*)$/;