<?xml version="1.0" encoding="windows-1252"?>
<node id="997292" title="Reoccuring message" created="2012-10-04 14:59:26" updated="2012-10-04 14:59:26">
<type id="115">
perlquestion</type>
<author id="994288">
truthseeker66</author>
<data>
<field name="doctext">
# My Code in the file. 
&lt;c&gt;
#!usr/bin/perl

use warnings;

@array = (1 .. 10);

for ($1 = 0; $i &lt;= 10; $i++) {


	$element = $array[$i];
	print "Element $1 equals $element \n";
}
&lt;/c&gt;




# The output of executing the above file. 
&lt;c&gt;
C:\JPARK\JPPERL&gt;test.pl
Modification of a read-only value attempted at C:\JPARK\JPPERL\test.pl line 7.

C:\JPARK\JPPERL&gt;test.pl
Modification of a read-only value attempted at C:\JPARK\JPPERL\test.pl line 7.

C:\JPARK\JPPERL&gt;

&lt;/c&gt;</field>
</data>
</node>
