use GD; 

$file = "$html_root/file1.gif"; 

open (IMAGE, $file) || &sys_error("Can't open $file: $!"); 

$im = newFromGif GD::Image(IMAGE) || &sys_error("Can't create image from $file: $!");

close IMAGE;
 
($im_width,$im_height) = $im->getBounds();

##</code><code>##

use GD;

$file = "$html_root/file2.jpg";

open (IMAGE, $file) || &sys_error("Can't open $file: $!");

$im = newFromJpeg GD::Image(IMAGE) || &sys_error("Can't create image from $file: $!");

close IMAGE;

($im_width,$im_height) = $im->getBounds();