my  $from = shift || '';
my  $select = shift || '';
my  $where = shift || '';
....
$sql.="FROM $where ";
$sql.="WHERE $other ";