# My Code in the file.

#!usr/bin/perl

use warnings;

@array = (1 .. 10);

for ($1 = 0; $i <= 10; $i++) {


    $element = $array[$i];
    print "Element $1 equals $element \n";
}
[download]

# The output of executing the above file.

C:\JPARK\JPPERL>test.pl
Modification of a read-only value attempted at C:\JPARK\JPPERL\test.pl
+ line 7.

C:\JPARK\JPPERL>test.pl
Modification of a read-only value attempted at C:\JPARK\JPPERL\test.pl
+ line 7.

C:\JPARK\JPPERL>
[download]