#if ($line =~ '^\s+(\w+):\s.*')
    if ($line =~ /^\s+(\w+):\s/)