Help for this page
# assuming the raw data is in $line.
$line =~ m/^[^;]*;\s*([^;]*?)\s*;/
# $1 now holds whatever is between the second and third
# semicolon, leading and trailing spaces trimmed.
An organised event
A traditional gathering
With family and friends
I don't celebrate the New Year
Adjusting my clocks for the Leap Second
I can't remember
Results (238 votes). Check out past polls.