Select Code to Download

#!/usr/bin/perl
use strict;
...
print "Author is: ", $pdfinfo{Author}, "\n";
print "Title is:  ", $pdfinfo{Title}, "\n";
print "\n\nAll info tags:\n", Dumper(\%pdfinfo);

Author is: Texas Instruments, Incorporated [SNAS033,D
]
...
          'Author' => 'Texas Instruments, Incorporated [SNAS033,D
]'
        };