Help for this page
Select Code to Download
Select
or
download this
my $substring = (split /\n/, $tmp)[-1];
Select
or
download this
my ($substring) = $tmp =~ /\n(.*)$/;