in reply to Re: Use of uninitialized value $data
in thread Use of uninitialized value $data

Then please show the content of the @data array using Data::Dumper.