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

Re: TMTOWTDI Puzzle: Generating a range of numbers

by toma (Vicar)
on Dec 19, 2001 at 11:36 UTC ( #133044=note: print w/replies, xml ) Need Help??

in reply to TMTOWTDI Puzzle: Generating a range of numbers

Are logical operators too obvious for this sort of challenge?
#!/usr/bin/perl use strict; my ($one,$two,$three,$four,$five,$six,$seven,$eight,$nine,$ten); $one="x" eq "x"; $two= $one << $one; $three= $one | $two; $four= $two << $one; $five= $four | $one; $six= $four | $two; $seven= $four | $two | $one; $eight= $four << $one; $nine= $eight | $one; $ten= $eight | $two; print "$one $two $three $four $five $six $seven $eight $nine $ten\n";

This sort of thing comes up in computer design. On the long path from transistors to programs, implementations are crushingly brute-force!

It should work perfectly the first time! - toma

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (5)
As of 2016-10-22 03:03 GMT
Find Nodes?
    Voting Booth?
    How many different varieties (color, size, etc) of socks do you have in your sock drawer?

    Results (291 votes). Check out past polls.