$r = do "file.pl"

##</code><code>##

{}