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

Re: makeing refering faster?

by Zero_Flop (Pilgrim)
on Aug 15, 2004 at 17:18 UTC ( #383111=note: print w/replies, xml ) Need Help??

in reply to makeing refering faster ?


You really need to get a good book on perl. Start on page one and work your way though.
Posting bad code over and over again is not going to get you anywhere!
There are numerous problems with this code. No strict, no Warnings.

It all boils down to:
$dat0 = 'a.txt'; open( DAT, "$dat0" ) || die ("Could not open file!"); @all = <DAT>; # I'm not enven sure what perl will do when you open the same file han +dle # twice without closing, I would assume it would close the first for y +ou, # but it's just bad. open( DAT, ">$dat0" ) || die; # You never write back to @all so you are doing nothing. print DAT @all; close(DAT);
If you want to learn, we can help you, but you have to learn to walk before you run.

janitored by ybiC: Moved from reaped parent thread into this'un, for better site searching

Replies are listed 'Best First'.
A reply falls below the community's threshold of quality. You may see it by logging in.

Log In?

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://383111]
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (5)
As of 2023-12-05 08:41 GMT
Find Nodes?
    Voting Booth?
    What's your preferred 'use VERSION' for new CPAN modules in 2023?

    Results (26 votes). Check out past polls.