I have somewhat of a dilemma here. If I read in the following file... named basicdez.dat
"Jane""Doe" "123 W Beverly Ave" "Talahasee""Maine" "222-22-2222"
"EOS"
with the following perl logic...
#!/usr/bin/perl
use strict;
my $i;
my $data;
open(DATA," basicdez.dat") || die "Cannot open datfile: $!\n";
while(<DATA>){
chomp;
unless ($_=~ /"EOS"/){
$data .= "$_";
} elsif ($i ne 1) {
$data .="\n";
}
if ($_=~ /"EOS"/){
$i=1;
}
}
close(DATA);
my @data=split(/\n/, $data);
for(@data){
my($first_name,$last_name,$address,$city,$state,$phone)=split;
print "$first_name,$last_name\n";
print "$address\n";
print "$city, $state\n";
print "$phone \n";
}
exit;
What I would expect would be something as follows...
Jane, Doe
123 W Beverly Ave
Talahasee,Maine
222-22-2222
However, what I am getting is the following...
"Jane""Doe","123
W
Beverly, Ave"
"Talahasee""Maine"
Please help me out on this one as I am most entirely confused. I thank you in advance for any assistance on this issue and apologize for my ignorance in what should be a simple matter.
peace
dez L
-
Are you posting in the right place? Check out Where do I post X? to know for sure.
-
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big>
<blockquote> <br /> <dd>
<dl> <dt> <em> <font>
<h1> <h2> <h3> <h4>
<h5> <h6> <hr /> <i>
<li> <nbsp> <ol> <p>
<small> <strike> <strong>
<sub> <sup> <table>
<td> <th> <tr> <tt>
<u> <ul>
-
Snippets of code should be wrapped in
<code> tags not
<pre> tags. In fact, <pre>
tags should generally be avoided. If they must
be used, extreme care should be
taken to ensure that their contents do not
have long lines (<70 chars), in order to prevent
horizontal scrolling (and possible janitor
intervention).
-
Want more info? How to link
or How to display code and escape characters
are good places to start.