for ( $i = 1; $i <= 5; ++$i ) {
push( @array, $i );
print "@array\n";
}
for ( $i = 1; $i <= 5; ++$i ) {
unshift( @array, $i ); # add $i to front of @array
print "@array\n"; # display current @array
}