Beefy Boxes and Bandwidth Generously Provided by pair Networks
Pathologically Eclectic Rubbish Lister

Re^2: sv_upgrade error

by wrinkles (Pilgrim)
on Nov 14, 2010 at 04:47 UTC ( #871277=note: print w/replies, xml ) Need Help??

in reply to Re: sv_upgrade error
in thread sv_upgrade error

DreamHost shared hosting. So I checked:
perl -MModule -e 'print "$Text::CSV::VERSION\n"'
Can't locate in @INC (@INC contains: /etc/perl /usr/local/li +b/perl/5.10.0 /usr/local/share/perl/5.10.0 /usr/lib/perl5 /usr/share/ +perl5 /usr/lib/perl/5.10 /usr/share/perl/5.10 /usr/local/lib/site_per +l .). BEGIN failed--compilation aborted.
Similar result for Text::CSV_XS. I think they recently updated to 5.10.0. But drop Text::CSV just like that? What are they thinking? I'll have to notify support and/or install locally.
Thanks for the help!

Replies are listed 'Best First'.
Re^3: sv_upgrade error
by ikegami (Pope) on Nov 14, 2010 at 05:29 UTC
    I can't reproduce it on DreamHost ( with the info you provided.
    $ cat use strict; use warnings; use feature qw( say ); use Text::CSV qw( ); use Encode qw( encode_utf8 ); say Text::CSV->VERSION; say Text::CSV->is_xs() ? 'xs' : 'pp'; say Text::CSV->version; my $csv = Text::CSV->new ({ allow_whitespace => 1, binary => 1, sep_char => '|', }) or die; my $csv_file = encode_utf8(<<'__EOI__'); foo|bar|baz dog|cat|cow __EOI__ open(my $csv_fh, "<:encoding(utf8)", \$csv_file) or die; say for $csv->column_names($csv->getline($csv_fh)); $ perl 1.06 xs 0.52 foo bar baz

    And with a locally installed Perl 5.12.1 on the same machine:

    $ perl 1.20 xs 0.74 foo bar baz
Re^3: sv_upgrade error
by Tanktalus (Canon) on Nov 14, 2010 at 05:33 UTC

    Yes, they updated to 5.10.0 over the summer - broke my code on there only insofaras I had to recompile the CPAN modules I was using due to the binary incompatibilities. However, to answer the question, then:

    $ perl -MText::CSV_XS -le 'print $Text::CSV_XS::VERSION' 0.52
    Looks like the one on DreamHost is somewhat dated. You may want to do a local install of Text::CSV_XS in that case. Thus far, I've not hit into any similar issue with my DBD::CSV usage, as I don't seem to have a newer version on my account.

      So I upgraded Text::CSV (and Text::CSV_XS)
      $ perl -MText::CSV -e 'print "$Text::CSV::VERSION\n"' 1.06 $ eval $(perl -I$HOME/perl5/lib/perl5 -Mlocal::lib) $ perl -MText::CSV -e 'print "$Text::CSV::VERSION\n"' 1.20
      And I'm getting somewhere, now I'm seeing a new error:
      EHR - getline_hr () called before column_names () at line + 676
      however I believe I called column_names:
      # declare column names for getline_hr $csv->column_names($csv->getline($csv_fh)); # Build Array of HashRefs my @buttons; while (my $row = $csv->getline_hr($csv_fh)) { push(@buttons, $row) unless ($. == 1); }
        OK I think I see the problem. getline IS called before column_names:
        Now to fix it...
        Make sure that getline was successful

        As of Text-CSV_XS version 0.71, you can pass the auto_diag => 1 attribute to the new () constructor (actually already in version 0.66, but in 0.71 it was fully functional. For Text::CSV these were versions 1.14 and 1.17), and all diagnostics will be automatic.

        Enjoy, Have FUN! H.Merijn

      broke my code on there only insofaras I had to recompile the CPAN modules I was using due to the binary incompatibilities

      That made me wonder why INSTALL_BASE is recommended over PREFIX. Using the latter, XS modules would go missing rather than become invalid, and you could actually have multiple perl installs using the same lib dir (which is good since they all use the same ENV var to locate the lib dir).

      I just use perlbrew now.

Re^3: sv_upgrade error
by ikegami (Pope) on Nov 14, 2010 at 05:24 UTC
    You're trying to load a module named "Module" instead of Text::CSV and Text::CSV_XS

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://871277]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others musing on the Monastery: (4)
As of 2017-08-19 21:53 GMT
Find Nodes?
    Voting Booth?
    Who is your favorite scientist and why?

    Results (312 votes). Check out past polls.