(TeX-add-style-hook "intro-to-perl"
 (function
  (lambda ()
    (TeX-add-symbols
     "labTitle")
    (TeX-run-style-hooks
     "hyperref"
     "lgrind"
     "verbatim"
     "alltt"
     "latex2e"
     "ictlab10"
     "ictlab"
     "solutions"))))