print "$newdata - [@newdataset]\n"; __END__ SCALAR(0x81b5d78) - [ARRAY(0x81b5eb0) HASH(0x812cc00)]