#!/usr/bin/perl
use strict;

foreach (@ARGV) {
	system qq(mogrify -format png $_);
	unlink $_;
}

__END__
