: exists $core{$1} ? corewrap $1, $2
: subwrap $1, $2, prototype($caller.'::'.$1)
/sexg;
- s/\Q$;\E(\C{4})\Q$;\E/${$components[unpack('N',$1)]}/g;
+ s/\Q$;\E([\x00-\xff]{4})\Q$;\E/${$components[unpack('N',$1)]}/g;
$_ .= $lastline if defined $lastline;
return $count;
}