Bareword "DATA" not allowed while "strict subs" in use at script.pl line 31.