catch($e) { say 'Hello ' . (split(' ', $e))[11] =~ s/::([0-9]+)/' ' . ($1+3)/er . ', from Six Apart.'; }