Help for this page

Select Code to Download


  1. or download this
    my $term = qr/"[^"\\]*(?>\\.[^"\\]*)*"|[^,"]*/;
  2. or download this
    my $term = qr/"[^"]*(?>""[^"]*)*"|[^,"]*/;
  3. or download this
    /^$term,$term,$term,($term)/o;
  4. or download this
    my $term = qr/"[^"\\]*(?>\\.[^"\\]*)*"|[^,"]*/;
while (<DATA>) {
...
18,0,13,"6.2",1
19,D610,,"6.3,r1",1
20,2f78,15,"6.3,r2",1