copy the following in convert.pl
chmod 700 convert.pl
then run
#!/usr/bin/perl
$filenum=0;
while ($dirname = <.>) { 
	while ($filename = <$dirname/*.ppm>) {
		system "convert $filename $filename";
		system "echo $filename";
	}
 }