$i=2;

while ($i<10)
{
	system "mogrify -geometry 384x256 00$i*";
	$i++;
}

while ($i<29)
{
	system "mogrify -geometry 384x256 0$i*";
	$i++;
}