Total time so time per iteration is <time> / <num> = 6.687500 / 4. For example the following result was obtained in under a second:

           ================ SmallProf version 2.01 ================
                             Profile of noname1.pl                    
+ Page 1
       ===============================================================
+==
    count wall tm  cpu time line
        0 0.000000 0.000000     1:use strict;
        0 0.000000 0.000000     2:use warnings;
        0 0.000000 0.000000     3:
        1 0.000001 0.000000     4:my @strs = (".", ",");
        0 0.000000 0.000000     5:
        1 0.000000 0.000000     6:for (1 .. 1000) {
     1000 0.547915 0.000000     7:    print "@strs\n";
        0 0.000000 0.000000     8:}
[download]