$ perl -MO=Deparse -e 'print (my ($rec) = undef);'

print my($rec) = undef;
-e syntax OK


$ perl -MO=Deparse -e 'print "return=" . (my ($rec) = undef);'

print 'return=' . (my($rec) = undef);
-e syntax OK