function fConvert {
   perl -e '
   use strict;
   use warnings;
   use RTF::TEXT::Converter;
   my $result;
   my $object = new RTF::TEXT::Converter(output => \$result);

   if (@ARGV) {
      foreach my $filename (@ARGV) {
         $object->parse_stream($filename);
         print $result;
         $result = '';
      }
   }
   '
}