Beefy Boxes and Bandwidth Generously Provided by pair Networks
laziness, impatience, and hubris
 
PerlMonks  

Re: Loading multiple identical variables in array with multiplication variable

by karlgoethebier (Monsignor)
on Sep 24, 2014 at 19:18 UTC ( #1101844=note: print w/replies, xml ) Need Help??


in reply to Loading multiple identical variables in array with multiplication variable

I don't know if this is mannerism or minimalism ;-)

#!/usr/bin/env perl + use strict; use warnings; # my @array = split('', join "", ( "A" x 20, "T" x 20, "C" x 30, "G" +x 30 ) ); # my @array = split '', join '', ( "A" x 20, "T" x 20, "C" x 30, "G" x + 30 ); my @array = split '', join '', "A" x 20, "T" x 20, "C" x 30, "G" x 30; print scalar @array . qq(\n); print for @array; __END__

But it works.

Update: No parentheses.

Regards, Karl

«The Crux of the Biscuit is the Apostrophe»

  • Comment on Re: Loading multiple identical variables in array with multiplication variable
  • Download Code

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others lurking in the Monastery: (5)
As of 2019-05-27 07:06 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Do you enjoy 3D movies?



    Results (155 votes). Check out past polls.

    Notices?
    • (Sep 10, 2018 at 22:53 UTC) Welcome new users!