Select Code to Download

use warnings;
use strict;
...

my $sth = $dbh->prepare ("select * from POINT where ID_DEVTYP like 'IN
+TELI%' AND ID_POINT like 'AUTO%'");
$sth->execute;