my %Params;
....
sub foo {
....
  $page->string($fn, 12, 150, $height, $Params{InvoiceID});
....
}