People of the Perl, 

I have this file that looks like:

e4933 e4343 e3435 e9809

and I am printing the first 40 lines using

open FILE ..... ;
while ( <FILE> ) {
chomp
print "$_ " if 1 .. 40;

and it gets me what I want as above on one line, but the end result needs 
to be

eject 0,0,0 e4933 e4343 e3435 e9809 ........

I tried to shift the array to populate it with the eject string but with 
no luck.

thanks!
Derek B. Smith
OhioHealth IT
UNIX / TSM / EDM Teams
614-566-4145

Reply via email to