[Clipart] upload script suggestion

[Jonadab the Unsightly One]

"Jonadab the Unsightly One" <jonadab at bright.net> writes:

>>> I'm not sure meta-metadata will ever occur in practice,
>>
>> It occurs in horse_2_konstantin_r._01.svg.
>
> Oh.  Hmmm.   To work around that I need Perl6 regular expressions.

Wait, maybe not...  a zero-width negative assertion might be enough.
I may have been mistaken before when I said this belongs to the famous
class of problems that are hard with Perl5 regexen.

-- 
$;=sub{$/};@;=map{my($a,$b)=($_,$;);$;=sub{$a.$b->()}}
split//,"ten.thgirb\@badanoj$/ --";$\=$ ;-> ();print$/