14:06 >perl 516_SoPW.pl Before: bless({ population => [ bless({ frequency => 50, number => 0, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 1, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 2, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 3, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 4, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 5, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 6, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 7, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 8, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 9, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 10, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 11, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 12, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 13, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 14, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 15, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 16, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 17, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 18, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 19, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 20, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 21, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 22, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 23, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 24, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 25, use_duration => 1 }, "Person"), ], }, "Nation") After: bless({ population => [ bless({ frequency => 50, number => 0, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 1, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 2, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 5, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 6, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 9, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 12, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 13, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 14, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 15, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 16, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 18, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 21, use_duration => 1 }, "Person"), bless({ frequency => 50, number => 22, use_duration => 1 }, "Person"), ], }, "Nation") 14:06 >