mirror of
https://bitbucket.org/jsuto/piler.git
synced 2025-06-12 23:17:02 +02:00
skipping the iv parameter initialisation
This commit is contained in:
@ -1,13 +0,0 @@
|
||||
#!/usr/bin/perl
|
||||
#
|
||||
|
||||
@x = ('A'..'Z','a'..'z',0..9);
|
||||
$iv = "";
|
||||
|
||||
srand;
|
||||
|
||||
for($i=0; $i<16; $i++){
|
||||
$iv .= @x[rand @x];
|
||||
}
|
||||
|
||||
print $iv;
|
Reference in New Issue
Block a user