Beefy Boxes and Bandwidth Generously Provided by pair Networks
more useful options
 
PerlMonks  

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 ?

chiburashka-

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.
Zero

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?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others imbibing at the Monastery: (4)
As of 2022-05-24 19:07 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Do you prefer to work remotely?



    Results (84 votes). Check out past polls.

    Notices?