in reply to eval with sub

No. You'd have to put single quotes in: 
$op= q('tag00'); eval "sub{dofunc($op);}"

[download]

Update: D'oh! Damn frickin' slow mozilla.

[ar0n]

In Section Seekers of Perl Wisdom