@{$info}{qw{     city       state   zip}} =
        ($token =~ /^([^,])+,\s+(\S+)\s+(\d+)$/)
            ? (      $1,        $2,     $3     )
            : (      '',        '',     ''     )
    ;