my $toInFromFt= ConvertTo( 'in', 'ft' );
    while(  <IN>  ) {
        chomp;
        print OUT $toInFromFt->($_), $/;
    }