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

Re: Schwartzian Transfrom using a subroutine

by BrowserUk (Pope)
on Jan 09, 2013 at 11:53 UTC ( #1012460=note: print w/ replies, xml ) Need Help??


in reply to Schwartzian Transfrom using a subroutine

I am getting the original sorting of the list.

Because your sub doesn't return the transformed string; it returns the result of the the last transform. Change that to:

sub transform{ my $string = shift; $string =~ tr/A-Z/a-z/;#kleinschreibung $string =~ tr/a-z//cd; $string; }

(As an aside; are you aware that for my $word (@output){say $word;} is more easily written as say for @output?)


With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'
Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
"Science is about questioning the status quo. Questioning authority".
In the absence of evidence, opinion is indistinguishable from prejudice.


Comment on Re: Schwartzian Transfrom using a subroutine
Select or Download Code
Re^2: Schwartzian Transfrom using a subroutine
by oliverhuber (Initiate) on Jan 09, 2013 at 12:13 UTC
    Many thanks! It's working now. Thanks also for the sidenote!
Re^2: Schwartzian Transfrom using a subroutine
by jwkrahn (Monsignor) on Jan 09, 2013 at 13:33 UTC
    (As an aside; are you aware that for my $word (@output){say $word;} is more easily written as say for @output?)

    They are not the same:

    $ perl -E'my @x = qw/one two three/; for my $x ( @x ) { say $x }' one two three $ perl -E'my @x = qw/one two three/; say @x' onetwothree
      perl -E'my @x = qw/one two three/; say @x'

      You missed something...

      is more easily written as say for @output?) #.............................^^^

      With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'
      Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
      "Science is about questioning the status quo. Questioning authority".
      In the absence of evidence, opinion is indistinguishable from prejudice.

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others cooling their heels in the Monastery: (6)
As of 2014-09-19 22:29 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How do you remember the number of days in each month?











    Results (149 votes), past polls