inconsequence | Learning Perl