Help for this page

Select Code to Download


  1. or download this
    my $line = 'marker <this> <that> <other>';
    my $rex = qr/(?:^marker\s|\G)<(.*?)>(?: |$)/;
    my @matches = ($line =~ /$rex/g);