my $foo =~ m{   # match things between ;;s
                ; (.+) ;
            }x;