Beefy Boxes and Bandwidth Generously Provided by pair Networks
Think about Loose Coupling
 
PerlMonks  

Re: Simple Table structure to file

by virtualsue (Vicar)
on Jan 23, 2007 at 09:41 UTC ( #596057=note: print w/replies, xml ) Need Help??


in reply to Simple Table structure to file

Since we all appear to be giving you different pieces of a solution:
#!/usr/bin/perl use warnings; use strict; use Data::Dumper; my %data; while (my $line = <DATA>) { chomp $line; [parse the input] [assign to your hash] } print Dumper \%data; # check to see if your code set up the HoA corre +ctly __DATA__ 01;22411384 01;18337723 02;38381289 02;38938222 10;13293383

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://596057]
help
Chatterbox?
[Lady_Aleena]: paco is a little over 2 years before my time.
[Discipulus]: you can try tachyon's iterative approach Re: Win32 Recursive Directory Listing
[Lady_Aleena]: I'm on Linux/
[beech]: isn't 2 year about standard recovery time for that kind of surgery?
[Discipulus]: if you hate FIle::Find
[Lady_Aleena]: I don't hate it, it just drives me crazy.
[Discipulus]: LA the solution is portable to whatever
[Lady_Aleena]: File::Find doesn't have a simple sub wanted example, like get the name of the file.
[Discipulus]: there is also find2perl with your perl installation

How do I use this? | Other CB clients
Other Users?
Others drinking their drinks and smoking their pipes about the Monastery: (10)
As of 2017-04-23 20:44 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    I'm a fool:











    Results (432 votes). Check out past polls.