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.
Non-existent; I don't have TV
Non-existent; my TV doesn't have/need a remote
Under my control; I watch alone
Under the control of whoever shouts loudest
Under the control of whoever gets it first
One of many, and the TV has a mind of its own
Results (130 votes),