elsif (s/^( $fqtyrex ) \s* t \s+ //xo) { $def->(0, $1 * 1000.0 ); }
elsif (s/^( $fqtyrex ) \s* l \s+ //xo) { $def->(1, $1 ); }
elsif (s/^( $fqtyrex ) \s* kl \s+ //xo) { $def->(1, $1 * 1000.0 ); }
elsif (s/^( $fqtyrex ) \s* t \s+ //xo) { $def->(0, $1 * 1000.0 ); }
elsif (s/^( $fqtyrex ) \s* l \s+ //xo) { $def->(1, $1 ); }
elsif (s/^( $fqtyrex ) \s* kl \s+ //xo) { $def->(1, $1 * 1000.0 ); }