...
    ## Set the default to truecolor images.
    GD::Image->trueColor( 1 );
    
    # create a new image
    my $im = GD::Image->new( $filename );

    if ($size eq "l") {
        $im->string(gdMediumBoldFont,27,44,"Secure ". GT::Date::date_get(), 0 );
    } elsif ($size eq "m") {
        $im->string(gdMediumBoldFont,29,26,"Secure ". GT::Date::date_get(), 0 );
    } elsif ($size eq "s") {
        $im->string(gdTinyFont,15,26,"Safe " . GT::Date::date_get() , 0);
    }
    binmode STDOUT;
    print $im->png;