#!/usr/bin/perl

use strict;
use warnings;
use CAM::PDF;

convert_pdf_to_text();

sub convert_pdf_to_text {
    use CAM::PDF::PageText;
    my $pdf_filename = '/path/to/pdf';
    my $pdf = CAM::PDF->new($pdf_filename);
    my $y   = $pdf->getPageContentTree(1);
    print CAM::PDF::PageText->render($y);
}