Help for this page

Select Code to Download

Select or download this

    my $x = "1234";
    my @X = ($x =~ /(#)?/)[1,3];
...
    __END__
    0
    Matched