my $dbh = DBI->connect( 'dbi:AnyData(RaiseError => 1):' ); $dbh->func( 'sms', 'Tab', $file, 'ad_catalog'); my $query = qq/select * from sms where "System Status" = '?'/; my $sth = $dbh->prepare( $query ); $sth->execute( 'ACTIVE' ); return $sth->fetchall_hashref( 'System Number' );