use getwh;

while (<DATA>)
{
	chomp;
	$file = $_;
	$name = $file;
	$name =~ s/.jpg//;
	$name =~ s/_/ /;
	($w, $h) = get_dimensions($file);
	print qq!<img src="$file" width="$w" height="$h"\n!;
	print qq!\talt="$name" />\n!;
}
__END__
Rich_Alarcon.jpg
Kevin_Austin.jpg
Cody_Beeson.jpg
Danny_Cadwallader.jpg
Jesse_Delgado.jpg
Kevin_Dunn.jpg
Steve_Gee.jpg
Paul_Gomez.jpg
Drew_Hoskins.jpg
Michael_Kent.jpg
Nick_Leon.jpg
Justin_Lozano.jpg
Patrick_Martinez.jpg
Chris_Mecate.jpg
Steven_Vasquez.jpg
Dakota_Velasquez.jpg