calling die from inside a map block is not a very good idea, it can hit a bug on the perl interpreter that has only recently being corrected:

for (1) { map { die } 2 }
[download]