Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine
 
PerlMonks  

Re: Fix-it fix-it fix-it!

by jwkrahn (Monsignor)
on Nov 15, 2012 at 04:52 UTC ( #1003929=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    print "What is the name of the access rights .csv? (Full file name)\n"
    +;
    my $file = <>;
    
  2. or download this
    print "What is the name of the access rights .csv? (Full file name)\n"
    +;
    chomp( my $file = <STDIN> );
    
  3. or download this
    print "Is there a header in this file?\n";
    my $header = <>;
    ...
    }
    else {$header = "undef";
    }
    
  4. or download this
    open (CSV, "<", $file);
    
  5. or download this
    open CSV, '<', $file or die "Cannot open '$file' because: $!";
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1003929]
help
Chatterbox?
[marto]: running late today, get to work and people are just sitting around. "can't delete file, quota exceeded"
[Corion]: marto: Oy :-/
[Corion]: Ah, it's only "quota exceeded", not "filesystem full", so it's "merely" an administrative act to up the FS quota resp. inode quota
[Corion]: I've been on databases where I couldn't drop a table or delete rows because the DB was full. Not so much fun...
[marto]: meh, the admins are lazy, I just piped null to some old large log files, problem solved

How do I use this? | Other CB clients
Other Users?
Others lurking in the Monastery: (13)
As of 2017-01-24 09:58 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Do you watch meteor showers?




    Results (203 votes). Check out past polls.