my $sql = <prepare( $sql ); if ( $sth && $sth->execute( $user_id ) ) { while ( my $row = $sth->fetchrow_arrayref() ) { print( "IP address " . $row->[0] . "\n" ); } $sth->finish(); } else { die( "Database error " . $dbh->errstr . "\n" ); }