#!/bin/sh
identify -verbose "$1" | perl -ne '/icc:description: (.*)/ && print "$1\n"'