Help for this page

Select Code to Download


  1. or download this
    qr/(?:$QUOTED|$NUM)(??{'' eq $& || '.' eq $& ? FAIL : SUCCEED})/
__END__
...
          ', fav.num => ',
          '3'
        ];
  2. or download this
    $VAR1 = [
          'name => ',
...
          '.num => ',
          '3'
        ];
  3. or download this
    my $VALUE  = do {
    use re 'eval';
...
          ', fav.num => ',
          '3'
        ];
  4. or download this
    my $VALUE  = do {
    use re 'eval';
...
(name => 5, fav)()(.num => 3)
(name => 5, fav.num => )(3)()
(name => 5, fav.num => )()(3)