summaryrefslogtreecommitdiff
path: root/bigarray/bigarray.pl
diff options
context:
space:
mode:
Diffstat (limited to 'bigarray/bigarray.pl')
-rwxr-xr-xbigarray/bigarray.pl21
1 files changed, 21 insertions, 0 deletions
diff --git a/bigarray/bigarray.pl b/bigarray/bigarray.pl
new file mode 100755
index 0000000..6e662f1
--- /dev/null
+++ b/bigarray/bigarray.pl
@@ -0,0 +1,21 @@
+#!/usr/bin/perl
+use POSIX;
+
+my @bigarray = ();
+
+my $acount = 0;
+
+for ( ; $acount < 500000; $acount++ ){
+ push( @bigarray, $acount );
+}
+
+$acount = 0;
+
+for ( ; $acount < 500000; $acount++ ){
+ print( $bigarray[$acount]."\n" );
+}
+
+undef $acount;
+undef @bigarray;
+
+exit( 0 );