in reply to formating data input
I'm not quite sure I don't understand your question: usually input data are pre-existing, and the program has to be written to process them.
What you seem to want is the first two fields of your input data. There are, of course, several ways to do that. What I would probably do would look like this:
#!/usr/bin/perl use strict; use warnings; my $input_file = pop(@ARGV) or die "Please enter file name on command +line\n"; open(my $input, "<", $input_file) or die "Could not open $input_file b +ecause $!\n"; while(<$input>) { my @line = split(/\s*\|\s*/, $_); print join(' | ', @line[0..1]) . "\n"; } close ($input);
emc
Any New York City or Connecticut area jobs? I'm currently unemployed.
There are some enterprises in which a careful disorderliness is the true method.
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: formating data input
by manu7495 (Initiate) on Jun 27, 2007 at 15:28 UTC |