Creating and initializing an array with list assignment
@array = ( "Hello", 283, "there", 16.439 ); # display every element of the array $i = 0; while ( $i < 4 ) { print "$i $array[ $i ]\n"; ++$i; }