Re: rand()

Bobby wrote:

I'm passing @nums values from an html form; so now my @nums = ($list) where
$list = 97000,97005,98000,96100,94003 . The rand funtion now interprets $list
as a string and not integers so the script doesn't works anymore. How do i
convert values with that list from a string to itegers so that the script
will work properly? Thanks for any suggestion.

Please take not of John Krahn's response, which I believe is superior to the
others in this thread. The program below does what you ask.

HTH,

Rob



use strict;
use warnings;

use List::Util 'shuffle';

use constant WINNERS => 4;

my $list = '97000,97005,98000,96100,94003';

my @winners = (shuffle $list =~ /\d+/g)[0..WINNERS - 1];

print "@winners\n";
.

Relevant Pages

  • Re: How to rewrite with awk?
    ... > I'm unfamiliar with tools such as sed & awk. ... Extract the string that matches a RE. ... This script will not only expand all the lines that say "include ... file) and not resetting ARGV(the tmp file), it then lets awk do any ...
    (comp.unix.shell)
  • Re: Slow string
    ... I see virtually no difference in execution time for the code you posted when using cscript versus using wscript; to confirm, I bracketed the code with an initial ... Are you actually entering the script name into a console window? ... You can use the exact same line for every wrapper script - and that includes wsf and js scripts; all you need to do is change the final "vbs" to "wsf" or "js" as appropriate. ... If you build a large string by small concatenations, the performance degrades geometrically - so does array resizing, because they both use the same nasty technique inherited from VB1 of copying the entire data structure to a new structure with the added element. ...
    (microsoft.public.scripting.vbscript)
  • Re: Function that returns date of file.
    ... string after the date/time when it is used by itself. ... Is that your entire script? ... I make an IF statement that required the 'equals equals'. ... designed database your job will be all that much harder. ...
    (alt.php)
  • Re: Script: Remote shutdown of all domain computers
    ... When trying to run the script from a XP workstation, where i am logged in as ... Dim strBase, strFilter, strAttributes, strQuery, objRecordSet ... 2000 or above and allow shutdown, ... Public Function AllComputersAs String() ...
    (microsoft.public.windows.server.scripting)
  • Re: Update Notes Field
    ... I was able to run the script without any problems. ... The info attribute can be assigned a value when the user object is created, but I don't see where dsadd can do it. ... Most attributes are string values, and VBScript strings can include the character vbCrLf. ... If there is another way to add the information to the Notes field, ...
    (microsoft.public.windows.server.active_directory)