for my $image (@images) {
        last if $total_count++ == 55;
        if(not $count){
            $thumb_line = Gtk2::HBox->new(FALSE,1);
            $thumb_page->pack_start($thumb_line,FALSE,FALSE,5);
        }

        print "Thumbing ". $image->name."\n";
        my $pixbuf = Gtk2::Gdk::Pixbuf->new_from_file ($image->name);
        my ($width,$height) = ($pixbuf->get_width, $pixbuf->get_height);
        my ($scale_width,$scale_height) = $width > $height ? (80,70) : (70,80);
        my $new_pixbuf = $pixbuf->scale_simple($scale_width,$scale_height,'GDK_INTERP_BILINEAR');
        
        my $event_box = Gtk2::EventBox->new;
        $thumb_line->add($event_box);
        $event_box->show;
        
        my $image_widget = Gtk2::Image->new();
        $image_widget->set_from_pixbuf($new_pixbuf);
        $image_widget->set_size_request(80,80);
        $image_widget->show;

        $event_box->add($image_widget);
        $event_box->signal_connect('button_press_event',\&image_clicked_event, $image->name);
        $event_box->window->set_cursor(Gtk2::Gdk::Cursor->new('hand1'));

        $thumb_line->show;
        #$pbar->pulse();
        #$pbar->show;
        $count = 0 unless ++$count < 10;
        $window->show;
    }