I wouldn't say your priorities are out of whack. I, on the other hand, had my laptop where it should be - on my lap - while watching the game on the TV. A bit of good from both worlds.
---------
perl -le '$.=[qw(104 97 124 124 116 97)];*p=sub{[@{$_[0]},(45)x 2]};*d=sub{[(45)x 2,@{$_[0]}]};print map{chr}@{p(d($.))}'