use List::Util qw( shuffle );

my @jumpedArray = map { $dataArray[$_] }
                  shuffle 
                  0 .. $#dataArray;