<div dir="ltr"><div>#!perl</div><div><br></div><div>use Modern::Perl;</div><div>use Text::CSV;</div><div><br></div><div>$_=  q|file1,field2,field3,"more text, in this field 4",field5,field6|;</div><div><br></div>
<div>my $csv = Text::CSV->new();</div><div>$csv->parse($_);</div><div><br></div><div>say for $csv->fields;</div><div><br></div></div><div class="gmail_extra"><br><br><div class="gmail_quote">On Wed, Jul 2, 2014 at 12:50 PM, Robert L. Harris <span dir="ltr"><<a href="mailto:robert.l.harris@gmail.com" target="_blank">robert.l.harris@gmail.com</a>></span> wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div dir="ltr"><br><div>So I found out WHY the idiot put the ' $_ =~ s/"//;' in the script.  I still get to beat him for doing it without telling us, but the 'why' is legitimate.</div>
<div><br></div><div>

Change the value of $_ to this:</div><div class=""><div><br></div><div><span style="font-family:arial,sans-serif;font-size:13px">$_=  file1,field2,field3,"more text, in this field 4,field5,field6</span><br></div><div>
<span style="font-family:arial,sans-serif;font-size:13px"><br>

</span></div></div><div><span style="font-family:arial,sans-serif;font-size:13px">( Field 4 generaly contains user input which is quoted, but it is truncated.  If the user input is > than that fiels will be missing the final closing quotes. )</span></div>


<div><span style="font-family:arial,sans-serif;font-size:13px"><br></span></div><div><font face="arial, sans-serif">Now I have no idea how to compensate for that.</font></div><span class="HOEnZb"><font color="#888888"><div>
<font face="arial, sans-serif"><br></font></div>

<div><font face="arial, sans-serif">Robert</font></div><div><font face="arial, sans-serif"><br></font></div><div><span style="font-family:arial,sans-serif;font-size:13px"><br></span></div><div><span style="font-family:arial,sans-serif;font-size:13px"><br>


</span></div><div><span style="font-family:arial,sans-serif;font-size:13px"><br></span></div><div><span style="font-family:arial,sans-serif;font-size:13px"><br></span></div></font></span></div><div class="HOEnZb"><div class="h5">
<div class="gmail_extra"><br><br><div class="gmail_quote">

On Tue, Jul 1, 2014 at 12:26 PM, Robert L. Harris <span dir="ltr"><<a href="mailto:robert.l.harris@gmail.com" target="_blank">robert.l.harris@gmail.com</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">


<div dir="ltr"><div><br></div>Given this line:<div><br></div><div>$_=  file1,field2,field3,"more text, in this field 4",field5,field6</div><div><br></div><div>I would expect the output of ( $va1, $var2, $var3, $var4, $var5, $var6 )=$csv->fields(); to yield:</div>



<div><br></div><div>$var1=field1</div><div>$var2=field2</div><div>$var3=field3</div><div>$var4="more text, in this field 4"</div><div>$var5=field5</div><div>$var6=field6</div><div><br></div><div>Instead though I get</div>



<div><div><br></div><div>$var1=field1</div><div>$var2=field2</div><div>$var3=field3</div><div>$var4="more text</div><div>$var5= in this field 4"</div><div>$var6=field5</div></div><div><br></div><div>What am I missing?  </div>


<span><font color="#888888">
<div><br></div><div>Robert</div><div><br></div><div><br><div><br></div>-- <br>:wq!<br>---------------------------------------------------------------------------<br>Robert L. Harris<br><br>DISCLAIMER:<br>      These are MY OPINIONS             With Dreams To Be A King,<br>



       ALONE.  I speak for                      First One Should Be A Man<br>       no-one else.                                     - Manowar
</div></font></span></div>
</blockquote></div><br><br clear="all"><div><br></div>-- <br>:wq!<br>---------------------------------------------------------------------------<br>Robert L. Harris<br><br>DISCLAIMER:<br>      These are MY OPINIONS             With Dreams To Be A King,<br>


       ALONE.  I speak for                      First One Should Be A Man<br>       no-one else.                                     - Manowar
</div>
</div></div><br>_______________________________________________<br>
Denver-pm mailing list<br>
<a href="mailto:Denver-pm@pm.org">Denver-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/denver-pm" target="_blank">http://mail.pm.org/mailman/listinfo/denver-pm</a><br>
<br></blockquote></div><br></div>