Lists

Chris Radcliff chris at velocigen.com
Fri May 26 09:33:44 CDT 2000


~sdpm~

In the spirit of TIMTOWTDI and webbishness:

<perl>
print qq{<table>\n};
print qq{<tr><td>Date</td><td>Time</td><td>Host</td>};
print qq{<td>ftpput</td><td>ftpget</td>};
print qq{<td>pingloss</td><td>pingavg</td>\n};

open (FILE, "in.txt") or die "didn't open file";

my @lines = (<FILE>)[-3..-1];

foreach my $line (@lines) 
{
  my ($Date, $Time, $Host, $ftpput, $ftpget, $pingloss, $pingavg) 
	= split " ", $line;
  print qq{<tr><td>$Date</td><td>$Time</td><td>$Host</td>};
  print qq{<td>$ftpput</td><td>$ftpget</td>};
  print qq{<td>$pingloss</td><td>$pingavg</td>\n};
}	
close FILE;

print qq{</table>\n};
</perl>

I'm not sure if this is less a memory hog than Eugene's response, but it
also assumes that the file is the standard
append-the-last-one-to-the-end format. Check out
http://www.globalspin.com/list_test.vep to see it in action.

~chris
~sdpm~

The posting address is: san-diego-pm-list at hfb.pm.org

List requests should be sent to: majordomo at hfb.pm.org

If you ever want to remove yourself from this mailing list,
you can send mail to <majordomo at happyfunball.pm.org> with the following
command in the body of your email message:

    unsubscribe san-diego-pm-list

If you ever need to get in contact with the owner of the list,
(if you have trouble unsubscribing, or have questions about the
list itself) send email to <owner-san-diego-pm-list at happyfunball.pm.org> .
This is the general rule for most mailing lists when you need
to contact a human.




More information about the San-Diego-pm mailing list