It's called a label and among other things it can be used for loop control. perlsyn describes its details.
Update: It can help to structure complicated nested loops, but it's better avoided in combination with goto.