well, it actually executes for me:

$ perl -c tst.pl
owned
tst.pl syntax OK
$ perl -MO=Deparse tst.pl
owned
exit;
'' =~ /(?{BEGIN{print "owned\n"}})/;
tst.pl syntax OK
$ perl --version

This is perl, v5.10.0 built for x86_64-linux-gnu-thread-multi

Copyright 1987-2007, Larry Wall

Perl may be copied only under the terms of either the Artistic License
+ or the
GNU General Public License, which may be found in the Perl 5 source ki
+t.

Complete documentation for Perl, including FAQ lists, should be found 
+on
this system using "man perl" or "perldoc perl".  If you have access to
+ the
Internet, point your browser at http://www.perl.org/, the Perl Home Pa
+ge.

$
[download]