Es wird nun wohl nicht Dein Problem loesen, aber ich wuerde mal "die print" durch einfach "die" ersetzen. perldoc -f die