use GD;
my $img = GD::Image->newFromJpeg('file.jpg', 1);