perl -e "map warn(+()), ('')x100;" ... ... Warning: something's wrong at -e line 1. Warning: something's wrong at -e line 1. Warning: something's wrong at -e line 1. Warning: something's wrong at -e line 1. Warning: something's wrong at -e line 1. Warning: something's wrong at -e line 1. Warning: something's wrong at -e line 1. Segmentation fault