#!/sw/bin/perl
use strict;
use warnings;
use DBI;
my $d =
  DBI->connect( 'DBI:mysql:imagedb:localhost', 'root', '******',
    { RaiseError => 1 } )
  || die("couldn't connect to database");
my ( $min, $max ) = $d->selectrow_array(
    "SELECT min(id),max(id) from images where gallery_path like '/px6%'")
  || die $d->errstr;

print "min: $min; max: $max;\n";

##</code><code>##

Use of uninitialized value in concatenation (.) or string at ab.cgi line 13.
min: 61893; max: ;