Perl Regex: execute perl code in RegEx

#execute perl code in RegEx ___FCKpd___0 = "abcdef"; if ( /abc(?{print "Hi Mom!/n";})def/ ) { print "crazy perl code in RegEx/n"; }