{ code => "\$res = ( \$str =~ /(2.):(1.):(0.)/ );", context => "SCALAR", mod => "", result => \1, } { code => "\$res = ( \$str =~ /(2.):(1.):(0.)/g );", context => "SCALAR", mod => "g", result => \1, } { code => "\$res = ( \$str =~ /2.:1.:0./ );", context => "SCALAR", mod => "", result => \1, } { code => "\$res = ( \$str =~ /2.:1.:0./g );", context => "SCALAR", mod => "g", result => \1, } { code => "\@res = ( \$str =~ /(2.):(1.):(0.)/ );", context => "LIST", mod => "", result => [21, 11, "01"], } { code => "\@res = ( \$str =~ /(2.):(1.):(0.)/g );", context => "LIST", mod => "g", result => [23, 13, "03"], } { code => "\@res = ( \$str =~ /2.:1.:0./ );", context => "LIST", mod => "", result => [1], } { code => "\@res = ( \$str =~ /2.:1.:0./g );", context => "LIST", mod => "g", result => ["21:11:01", "22:12:02", "23:13:03"], } { code => " ( \$str =~ /(2.):(1.):(0.)/ );", context => "VOID", mod => "", result => undef, } { code => " ( \$str =~ /(2.):(1.):(0.)/g );", context => "VOID", mod => "g", result => undef, } { code => " ( \$str =~ /2.:1.:0./ );", context => "VOID", mod => "", result => undef, } { code => " ( \$str =~ /2.:1.:0./g );", context => "VOID", mod => "g", result => undef, } 21:11:01 22:12:02 23:13:03 { 'LIST' => { 'MOD_' => { 'GROUPS_NO' => [ 1 ], 'GROUPS_YES' => [ '21', '11', '01' ] }, 'MOD_g' => { 'GROUPS_NO' => [ '21:11:01', '22:12:02', '23:13:03' ], 'GROUPS_YES' => [ '23', '13', '03' ] } }, 'SCALAR' => { 'MOD_g' => { 'GROUPS_YES' => 1, 'GROUPS_NO' => 1 }, 'MOD_' => { 'GROUPS_NO' => 1, 'GROUPS_YES' => 1 } }, 'VOID' => { 'MOD_g' => { 'GROUPS_NO' => undef, 'GROUPS_YES' => undef }, 'MOD_' => { 'GROUPS_YES' => undef, 'GROUPS_NO' => undef } } }