Sziasztok!

Tud valaki olyan ingyenesen hozzaferheto progit, ami
tud progressziv JPEG-et menteni?

Udv.
----
Zoli
E-mail: 
vagy 
Web: http://come.to/hegedusz
( http://members.tripod.com/~hegedusz )
----

***Formatting harddisk, please wait... He-he, just
joking! It's done.***

> Hi,

nalam csak ugy ment, ha
Use Socket;

es a egen nem REMOTE_ADDR'},1, hanem ADDR'},AF_INET volt..

csok,
Tibyke


> =======================================================
> Felado :  [Hungary]
> Temakor: re:erkezes helye ( 36 sor )
> Idopont: Fri Dec 25 06:55:53 EST 1998 WEBMESTER #606
> - - - - - - - - - - - - - - - - - - - - - - - - - - - -
>
> Hello!
>
> Nalam Perl Script-kent az alabbi remekul mukodik.
>
> ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
>   $date = "$year. $mon $mday.";
>   $ido="$hour\:$min";
>
> if( $ENV{'REMOTE_HOST'} =~ /[0-9]*\.[0-9]*\.[0-9]*\.[0-9]*/ ){
>   ($RemoteHost) =
> gethostbyaddr(pack('C4',split(/\./,$ENV{'REMOTE_ADDR'})),1);
>   }
> else{
>   $RemoteHost = $ENV{'REMOTE_HOST'};
>   }
>
> open (flog, ">>default.log");
> flock(flog, LOCK_EX);
> print flog $RemoteHost;
> print flog " * $date  * $ido * ";
> print flog $ENV{HTTP_REFERER};
> print flog " *\n";
> close (flog);