my $sql = ...;
my $cmd = qq[mysql --quick --raw -u $user -p$pass -be $sql]
my @results;
eval{
    alarm 5;
    my $pid = open SQL, "$cmd |" or die $!;
    push @results, <SQL>;
    alarm 0;
};
if( $@ ) {

}
...