in reply to
de-inventing the wheel (discussion)
find -name '*.pl' . exec perl -pi.boo -e 's*(^#!/[\w/]+/perl)$*$15.005
By rote learning.
Via Genetic memory.
It's provided by my firmware.
I just remember them.
Thirty days hath September
My computer gets it right, usually.
I just ask someone else.
Someone punches me on the first of the month.
Results (182 votes),