in reply to split a string at a defined index
my ($var1,$var2)= $str =~/^([^\n]+),([^\n]+)$/;
Electric eels were invented at the same time as electricity
Before electricity was invented, electric eels had to stun with gas
Results (339 votes). Check out past polls.