Re: [PHP] php to perl

2003-03-18 Thread Daniel Andersen
Regards, Daniel On Wed, 19 Mar 2003 13:16, Sebastian wrote: > unfortunately i am a rookie with perl, can someone help me convert this > little bit of code to php? > > thanks in advanced. > > #!/usr/bin/perl > print "Content-type: text/html\n\n"; > open(LOADAVG, '/proc/loadavg') or die $1

[PHP] php to perl

2003-03-18 Thread Sebastian
unfortunately i am a rookie with perl, can someone help me convert this little bit of code to php? thanks in advanced. #!/usr/bin/perl print "Content-type: text/html\n\n"; open(LOADAVG, '/proc/loadavg') or die $1; while( ) { $loadavg = substr( $_, 0, 4 ); } close(LOADAVG); cheers, - Sebastian