PHP:


#!/usr/bin/perl

use GD;

use CGI qw(:standard);

$filepath="../picture.jpeg";   # путь к файлу

unlink $filepath;

# Создаем новое изображение

$im = new GD::Image(200, 30);

# Определяем цвета

$text_color = $im->colorAllocate(0,0,0);       #  текст

$fon= $im->colorAllocate(255,255,0);           #  фон

$line_color=$im->colorAllocate(180,180,180);   #  линии

$ramka= $im->colorAllocate(0,0,0);             #  рамка

$im->transparent($white);

$im->interlaced('true');

# Рисуем  рамку

$im->rectangle(0,0,199,29,$ramka);

$s=0;

# заливаем  цветом картинку

$im->fill(20,20,$fon);

open(PICTURE, ">$filepath") or die("Cannot open file for writing");

# пишем. ШКИФТ, Х, У, ТЕКСТ, ЦВЕТ

$im->string(gdLargeFont, 10, 5,  "Your IP - ".$ENV{'REMOTE_ADDR'}, $text_color);

binmode PICTURE;

$ss  = 1;

undef $ss;

print "Content-type: image/jpeg\n\n";

print $im->jpeg(100);

close PICTURE;
font>

Вот, кстати, сама картинка, выложил на своем любимом fatal.ru.
А на ней - ВАШ ip.
Не буду шокировать и добавлять туда прочие примочки, которыми иногда пользуюсь.
[показать]
Ссылка на нее - http://shpion.fatal.ru/userbar.cgi Если захотите кого-то порадовать на форуме или на лиру. :-)

Чуть не забыл. А вот содержание вашего системного диска: file://C:\ Оформите ссылкой )