Name "main::Data" used only once readline() on unopened filehandle DATA