Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight
 
PerlMonks  

generating random thruth-tables

by neniro (Priest)
on Sep 24, 2008 at 13:34 UTC ( [id://713422]=CUFP: print w/replies, xml ) Need Help??

I needed a bunch of truth-tables, with random result-rows, as exercises for logical minimization. An easy task utilizing Perl:
perl -e "print sprintf('%03b',$_).' '.int(rand()+0.5).$/ for 0..7"

Replies are listed 'Best First'.
Re: generating random thruth-tables
by toolic (Bishop) on Sep 24, 2008 at 14:06 UTC
    Really no need for both print and sprintf when just printf will suffice. And while I'm at it, I'll just reach into my (perl) golf bag and club your code down some:
    perl -e'printf"%03b %b\n",$_,rand(2)for 0..7'

      You can chop one character off like perl -e'printf"%03b %b\n",$_,rand 2for 0..7'.

      I really like this - it's shorter and easier to read!

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others exploiting the Monastery: (2)
As of 2024-04-24 17:21 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found