if (open($fh, ">", $file))
{
     $query->save($fh);
     close($fh);
}
else
{
     # Die? Complain?
}