पर्ल में एक सरणी को घुमाने का सबसे अच्छा तरीका क्या है?

Question

तो मेरे पास एक फ़ाइल है। मान लें कि यह इस तरह दिखता है (यह वास्तव में लंबे समय तक है) करते हैं:

1234 
2134 
3124 
4123 

सबसे अच्छा तरीका है कि फ़ाइल की पंक्तियों को शफ़ल करने के लिए क्या है?

Answer 1

#!/usr/bin/env perl 

use strict; 
use warnings; 

use List::Util qw/shuffle/; 

my @arr = shuffle <>; 

print @arr; 

उपयोग:

./script file.txt