foreach$line (<DATA>){
	$line =~ s/\n//g;
	
	print $line."\n";
	`convert -gamma 0.5 $line $line`;
	# convert -gamma 0.5  68.png 68s.png

}


__DATA__
5.png
68.png
69.png
70.png
89.png
90.png
91.png
92.png