Sponsored Content
Full Discussion: randomization
Top Forums Shell Programming and Scripting randomization Post 302117742 by aigles on Wednesday 16th of May 2007 08:24:04 AM
Old 05-16-2007
You can do something like that :
Code:
random_word() 
{
   if [ -z "$all_words" ]
   then
      sed '1s/,/ /g' random_words_file | read all_words 
      set -A words -- ${all_words}
   fi  
   word_index=$(( $RANDOM % ${#words[@]} ))
   echo ${words[$word_index]}
}

word=$(random_word)

Jean-Pierre.
 

We Also Found This Discussion For You

1. Shell Programming and Scripting

Randomization a matrix - perl / Shell

Hello all, I have a tricky question! (at least for me it is!). I'll try to explain it carefully here. Hope you can help me solving the whole or even parts of it! Here it is: I have a big input 0\1 table as a very simplified one is shown below: (The last row and column are the sum and... (0 Replies)
Discussion started by: @man
0 Replies
SQL::ReservedWords::DB2(3pm)				User Contributed Perl Documentation			      SQL::ReservedWords::DB2(3pm)

NAME
SQL::ReservedWords::DB2 - Reserved SQL words by DB2 SYNOPSIS
if ( SQL::ReservedWords::DB2->is_reserved( $word ) ) { print "$word is a reserved DB2 word!"; } DESCRIPTION
Determine if words are reserved by DB2. METHODS
is_reserved( $word ) Returns a boolean indicating if $word is reserved by either DB2 5, 6, 7 or 8. is_reserved_by_db2v5( $word ) Returns a boolean indicating if $word is reserved by DB2 5. is_reserved_by_db2v6( $word ) Returns a boolean indicating if $word is reserved by DB2 6. is_reserved_by_db2v7( $word ) Returns a boolean indicating if $word is reserved by DB2 7. is_reserved_by_db2v8( $word ) Returns a boolean indicating if $word is reserved by DB2 8. reserved_by( $word ) Returns a list with DB2 versions that reserves $word. words Returns a list with all reserved words. EXPORTS
Nothing by default. Following subroutines can be exported: is_reserved is_reserved_by_db2v5 is_reserved_by_db2v6 is_reserved_by_db2v7 is_reserved_by_db2v8 reserved_by words SEE ALSO
SQL::ReservedWords <http://www-306.ibm.com/software/data/db2/udb/> AUTHOR
Christian Hansen "chansen@cpan.org" COPYRIGHT
This program is free software, you can redistribute it and/or modify it under the same terms as Perl itself. perl v5.8.8 2008-03-28 SQL::ReservedWords::DB2(3pm)
All times are GMT -4. The time now is 06:28 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy