You are not using strictures (use strict; use warnings;).
You don't check that CAM::PDF->new($transcript) succeeded.
my $conc_text.=$text; is bizarre and unnecessary, just use $text in the following print.
Placing use CAM::PDF in the middle of your code is misleading. use is parsed during the compilation phase so putting use anywhere except atthe top of your script gives a false impression of when it is executed.