my $db = ( $ENV{'SERVER_NAME'} !~ /varsa/ )
       ? DBI->connect('DBI:mysql:pneumatika;localhost', 'root', '*******', {RaiseError=>1})
       : DBI->connect('DBI:mysql:18177_pneumatika;fdb1.runhosting.com', '18177_pneumatika', '*****', {RaiseError=>1});

$select = $db->prepare( "SELECT counter, host FROM guestlog" );
$select->execute;

my $pagecounter;
while( $row = $select->fetchrow_hashref )
{
    $pagecounter += $row->{counter} unless ($row->{host} eq "varsa);
}