Changes
/* Code for image conversion */
# output file:
open(F,">/tmp/out-teletext.tti") || die("Cannot open output file $!");
# input png file: open (IM,"mc80.png") || die("Cannot open input file $!");;
$im = newFromPng GD::Image('IM');
close IM;
