eval ' sub PRINT { print 1 + shift }';