Help for this page
( /^BAK(\w+)\s+(\d+)\s+([\w\_]+)\s*/i )
$bakjobs->{"$2"}{"dbt"} = $1; $bakjobs->{"$2"}{"cdt"} =$3;