Which is not available under miniperl.
To add to the fun, tie() is partly compile-time, so just simple
skipping is not enough.
'[perl #129038 ] s/\xff//l no longer crashes');
}
-{
+ SKIP: {
+ skip("no Tie::Hash::NamedCapture under miniperl", 3) if is_miniperl;
+
# RT #23624 scoping of @+/@- when used with tie()
#! /usr/bin/perl -w
package main;
+ eval <<'__EOF__';
tie my %pre, 'Tie::Prematch';
my $foo = 'foobar';
$foo =~ s/.ob/$pre{ $foo }/;
undef *Tie::Prematch::TIEHASH;
undef *Tie::Prematch::FETCH;
+__EOF__
}