On 6/25/07, Mihir Kamdar <[EMAIL PROTECTED]> wrote:
if (2 != ($#ARGV+1)) {
That works, but it's usually written more like this:
if (@ARGV != 2) {
open INFILE, "<$ARGV[0]" || die "unable to open INFILE";
open OUTFILE, ">$ARGV[1]" || die "unable to open OUTFILE";
These don't do what the
Hi Tom,
I found a script which does this for me which is as follows:-
#!/usr/bin/perl
#open(INFILE,'testJohor1.csv');
#open(OUTFILE,'xyz1.txt');
if (2 != ($#ARGV+1)) {
print "Usage: $0 \n";
exit 1;
}
open INFILE, "<$ARGV[0]" || die "unable to open INFILE";
open OUTFILE, ">$ARGV[1]"
On 6/24/07, Mihir Kamdar <[EMAIL PROTECTED]> wrote:
I have a csv file having 3rd field as phone number series. In that field,
some of the records are phone number ranges like 097611/4
Now I need to seperate this into 4 numbers and store them one after the
other, like:-
097611
097612
097613
097
On 6/24/07, Mihir Kamdar <[EMAIL PROTECTED]> wrote:
Hi,
I have a csv file having 3rd field as phone number series. In that field,
some of the records are phone number ranges like 097611/4
Now I need to seperate this into 4 numbers and store them one after the
other, like:-
097611
097612
097613
Hi,
I have a csv file having 3rd field as phone number series. In that field,
some of the records are phone number ranges like 097611/4
Now I need to seperate this into 4 numbers and store them one after the
other, like:-
097611
097612
097613
097614
There are more than 1000 records in the csv
