Help for this page
#!perl -pl /\d+\+/;$-+=rand$&for 1..$_;$_+=$'+$-
#!perl -pl s/d/q(+~~rand($')+d)x$`/e;$_=eval