# # (c) Jan Gehring # # vim: set ts=2 sw=2 tw=0: # vim: set expandtab: package Rex::Helper::Misc; { $Rex::Helper::Misc::VERSION = '0.55.3'; } use strict; use warnings; sub get_random { my $count = shift; my @chars = @_; srand(); my $ret = ""; for ( 1 .. $count ) { $ret .= $chars[ int( rand( scalar(@chars) - 1 ) ) ]; } return $ret; } 1;