Help for this page
my @a = (1) x 1024; print $_, "\n" for @a;
my @b = (1) x 1024; print "$_\n" for @b;
#!/usr/bin/perl ... __END__ 24636 38972