$im->stringFT(
    $blue, "/home/development/archivesystem/ARLRDBD.TTF", 
    12.0, 0.0, 0, 45, "kokomo"
) or die "writing: $!";