> Just to make sure I need to use only Perl no other stuff

dream on ... :)

> Just to make sure I need to use only Perl no other stuff

Preferably without the need for a computer.

> > Just to make sure I need to use only Perl no other stuff

OK ...

  DB<100> $_="files.doc"
 
  DB<101> tr/cdo/fpd/
 
  DB<102> print
files.pdf
[download]

... done! :)

> Preferably without the need for a computer.

We could train rats ...

Cheers Rolf

system('unoconv', '-f', 'pdf', 'yourfile.doc')
   and die "Can't launch unoconv: $!";
[download]

It came up with the following error when I executed the above code.

system('unoconv', '-f', 'pdf', 'yourfile.doc') and die "Can't launch unoconv: $!";

You need to install unoconv first. Take a look here. That line of code is just a system call - I guess a little "tongue in cheek" because you asked for a pure Perl solution...

I reversed your thought process---instead of .doc to .pdf, think .pdf "from" .doc. This was my first stab at it:

#!/usr/bin/perl

use strict;
use Text::FromAny;
use HTML::FromText;
use PDF::FromHTML;

my $tFromAny = Text::FromAny->new(
    file => '/root/Desktop/basic.doc');
my $text = $tFromAny->text;
text2html($text);

my $pdf = PDF::FromHTML->new( encoding => 'utf-8' );
$pdf->load_file(\$text);
$pdf->convert(
    FontUnicode => 'Helvetica',
    LineHeight  => 10,
    Landscape   => 1,
);
$pdf->write_file('/root/Desktop/target.pdf');
[download]

I wouldn't have understood the OP requirement to be that. Word can save files in .pdf format, so I would expect to produce the same results as that with Perl. .doc format is pretty unbreakable, whereas .docx can be parsed because it is nothing more than zipped tree of xml files. The only way I can think of is to automate Word into doing it from .doc, which is pretty horrible.

One world, one people

I am working on Windows.

I suggest you search for a command line conversion program. You can call it from perl.