Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation

Re: a learning exercise - diary program

by chromatic (Archbishop)
on Jan 27, 2001 at 05:17 UTC ( #54692=note: print w/replies, xml ) Need Help??

in reply to a learning exercise - diary program

Things I would do slightly differently:
  • Use a separate variable for the DIARY location (reusing variables for different things can be confusing)
  • Return text from weather() instead of printing within the subroutine (do your printing all in one place)
  • Create a timestamp() subroutine to format the times nicely
  • (some time in the future) Create a separate get_diary_text() subroutine so you can add different entry methods as Elgon suggests
Nothing scares me about what you have now. It's solid code.
  • Comment on Re: a learning exercise - diary program

Replies are listed 'Best First'.
Re: Re: a learning exercise - diary program
by a (Friar) on Jan 27, 2001 at 09:56 UTC
    Just a guess, but there may be a misunderstanding in the reuse of *diary.
    @diary = 'path/to/diary.txt'; open(DIARY,">>@diary") or die "can't open file: $!";
    (its a good idea to do 'or die "can't open @diary: $!"' well not '@diary' but the var holding the file name in the die stmt, as in 'or die "can't open diary file $file: $!"') is odd and just sort of lucky. You're mixing the Array @diary in a scalar context, er, I think that'll just make
    $diary[$[] eq "/path/to/diary.txt";
    fortunately, putting the @diary in a quote context unrolls it as if join("", @diary) which gives you back "/path/to/dairy.txt"


Log In?

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

How do I use this? | Other CB clients
Other Users?
Others studying the Monastery: (8)
As of 2016-10-27 13:37 GMT
Find Nodes?
    Voting Booth?
    How many different varieties (color, size, etc) of socks do you have in your sock drawer?

    Results (362 votes). Check out past polls.