my @aliases = $sql =~ /\bas\s+(\w+)/ig;

##</code><code>##

SELECT foo a, bar b FROM baz