#!/usr/local/bin/perl # Written by #2pencil 10/09/2007 $data_file="data.txt"; $i=1; open(MYFILE, $data_file) || die("Could not open log file!"); @raw_data=; foreach $line (@raw_data) { chop($line); print "$i) $linen"; $i++; } close(MYFILE);
Read a file, display the results
Page 1 of 10 Replies - 1551 Views - Last Post: 09 October 2007 - 09:42 AM
#1
Read a file, display the results
Posted 09 October 2007 - 09:42 AM
Description: Read a file, display the results
Page 1 of 1