the following statements gives solutions to you...

Code as
$_ =~ /TICKET NUMBER\-\+\[(.*?)\]/;
$_ =~ /OLD TICKET NUMBER\-\+\[(.*?)\]/;

Instead of

$_ =~ /TICKET NUMBER-+\[(.*?)\]/;
$_ =~ /OLD TICKET NUMBER-+\[(.*?)\]/;

* Frank *