## prepare some SELECT statement $sth->execute() || die "Error: " . $dbh->errstr; if( $sth->rows > 0 ){ ## do some stuff } #### ($_='kkvvttuubbooppuuiiffssqqffssmmiibbddllffss') =~y~b-v~a-z~s; print