Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked

Re: Assignments for Subroutines

by protist (Monk)
on Sep 27, 2012 at 10:00 UTC ( #995959=note: print w/replies, xml ) Need Help??

in reply to Assignments for Subroutines

The following is my version of part 1. You may find use diagnostics useful if you are new.
#!/usr/bin/perl use strict; use warnings; use diagnostics; #more verbose feedback #useful for debugging my@num = (1..10); sub printeven{ my @given=@_; #pull in list given later: printeven(@list) my @evens; for (@given){ unless($_%2){ #unless odd push(@evens,$_); #add number to @evens } } $,=", "; #change list delimiter for fancy printing print @evens; print "\n"; #newline $,=""; #change list delimiter back before it is a problem } printeven(@num); #call sub with list of numbers 1-10

Replies are listed 'Best First'.
Re^2: Assignments for Subroutines
by nemesdani (Friar) on Sep 27, 2012 at 10:29 UTC
    $,=", "; #change list delimiter for fancy printing print @evens; print "\n"; #newline $,=""; #change list delimiter back before it is a problem
    That could be written as
    { local $,=", "; print @evens; print "\n"; #newline }
    No need to change it back, less possibility of an error. My 2 cents.

    I'm too lazy to be proud of being impatient.

      Indeed. Especially because this...

      $,=""; #change list delimiter back before it is a problem

      ... changes the list delimited "back" to the empty string, when we never checked that it started off as the empty string to begin with!

      perl -E'sub Monkey::do{say$_,for@_,do{($monkey=[caller(0)]->[3])=~s{::}{ }and$monkey}}"Monkey say"->Monkey::do'
      That is better. You have my +1

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others drinking their drinks and smoking their pipes about the Monastery: (3)
As of 2016-10-24 04:49 GMT
Find Nodes?
    Voting Booth?
    How many different varieties (color, size, etc) of socks do you have in your sock drawer?

    Results (303 votes). Check out past polls.