Help for this page
$_=' ---------- ------------------------- -------- --- ... while( m/-\S.\s|$/g){ print pos() -1,qq(\n) }
13 40 ... 96 109 121