in reply to how to split full digit number?
See below. I have added an extra pair of parantheses to make .9 optional...
my $f = 'chap 89.9';
print " $2 $4\n";
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 (214 votes). Check out past polls.