I'm looking for a really specific program, and how it resulted so difficult to find, I intend on asking for help to you guys.

I want a program that's capable of telling me if I compleated a certain percentage. I mean, for example, that in thins program, I'm able to write a random percentage, the program then has that percentage of telling me yes.

I hope i've been clear :s

if (random number between 0 and 1) < percentage/100
print "yes"

#!/usr/bin/perl -l
use Quantum::Superpositions;
my $percentage=shift;
print "yes" unless any(any(0..100)..$percentage);