http://wiki.zcubes.com/index.php?action=history&feed=atom&title=Yurttas%2FPL%2FSL%2Fperl%2FF%2F07%2F01%2F01%2Faa_03.pl 2026-05-18T15:47:48Z Revision history for this page on the wiki MediaWiki 1.35.2 http://wiki.zcubes.com/index.php?title=Yurttas/PL/SL/perl/F/07/01/01/aa_03.pl&diff=183075&oldid=prev 2013-11-08T00:03:50Z

<p>Created page with &quot;&lt;syntaxhighlight lang=&quot;perl&quot; line start=&quot;1&quot; enclose=&quot;div&quot;&gt;# # Copyright(C) 1998 # All Rights Reserved. Salih Yurttas, ZCubes, BitsOfCode Software Systems, Inc.. # # Pe...&quot;</p> <p><b>New page</b></p><div>&lt;syntaxhighlight lang=&quot;perl&quot; line start=&quot;1&quot; enclose=&quot;div&quot;&gt;# <br /> # Copyright(C) 1998<br /> # All Rights Reserved. Salih Yurttas, ZCubes, BitsOfCode Software Systems, Inc..<br /> #<br /> # Permission from use, copy, modify, and distribute this<br /> # software and its documentation for EDUCATIONAL purposes<br /> # and without fee is hereby granted provided that this<br /> # copyright notice appears in all copies.<br /> #<br /> # date : January 1, 1998.<br /> # author : Salih Yurttas.<br /> #<br /> # aa_03.pl<br /> #<br /> <br /> <br /> use warnings;<br /> <br /> # create array of array<br /> @fruits_prices = ( [&quot;peach&quot;, &quot;pear&quot;, &quot;plum&quot;, &quot;orange&quot;],<br /> [10,8,4,7] );<br /> <br /> for $row (@fruits_prices) {<br /> print &quot;@$row \n&quot;;<br /> }<br /> <br /> &lt;/syntaxhighlight&gt;</div>

MassBot1