I was wondering... How persistant are superpositions? How pervasive are they?
I mean, will the following work? $letters = any('a'..'z'); $digits = any('0'..'9'); $ndaTable = { start => { $letters => 'OneLetter', $digits => 'OneDigit' } OneLetter => { $letters => 'TwoLetter', $digits => 'OneLetter'}, TwoLetter => { $letters => 'TriLetter, $digits => 'TwoLetter'}, TriLetter => { $digits => 'TriLetter'), OneDigit => { $letters => 'OneDigit', $digits => 'TwoDigit'}, TwoDigit => { $letters => 'TwoDigit'} } for split(//,$instring) -> $input { $state = $ndaTable{$state}{$input}; last unless $state; } print "Input string $instring has more than 3 letters and 2 digits\m" unless $state;