#!/usr/bin/perl use Gimp qw(:auto); use Gimp::Fu; print "geht";