Help for this page

Select Code to Download

Select or download this

my @info = $rawdata =~ /$Start\s*(.+?)\s*$End/g;
print join ';', @info;

Select or download this

my $regex = qr/$Start\s*(.+?)\s*$End/;

my @info = $rawdata =~ /$regex/g;
print join ';', @info;