Copy an array and compare

Script

#!/usr/bin/perl

@array1 = (Sehwag, Gambhir, Dravid, Tendulkar, Ganguly, Laxman, Dhoni, Harbhajan, Kumble, Zaheer, Srinath);
@array2 = @array1;

$count = 1;

while ($count <= 11)
{
        print ("Player $count: $array1[$count - 1] ");
        print ("$array2[$count - 1] \n");
        $count++;
}

Execution

Player 1: Sehwag Sehwag

Player 2: Gambhir Gambhir

Player 3: Dravid Dravid

Player 4: Tendulkar Tendulkar

Player 5: Ganguly Ganguly

Player 6: Laxman Laxman

Player 7: Dhoni Dhoni

Player 8: Harbhajan Harbhajan

Player 9: Kumble Kumble

Player 10: Zaheer Zaheer

Player 11: Srinath Srinath