my ($data_from_MySQLdb); $sth->bind_columns(undef,\$data_from_MySQLdb); while($sth->fetch()){ open(MYTREEFILE,"$data_from_MySQLdb") or die; while(){ print STDOUT "$_"; } }