Today I saw these two lines in one backup script that was written in perl: my $d = (localtime())[6]; $d = $d=~/[067]/ ? 0 : $d % 2 + 1; Does this look cryptic to you? Probably not. But I wanted to write something and thought that these two lines won't be that obvious for … Continue reading Analysis of two perl lines