#!/usr/bin/perl -l

use strict;
use warnings;
use Getopt::Long;
use Image::Magick;
use IO::Handle ();

STDOUT->autoflush(1);