--- a/.emacs-my	Fri Jul 06 21:54:09 2012 +0300
+++ b/.emacs-my	Fri Jul 06 22:01:53 2012 +0300
@@ -2038,6 +2038,13 @@
 ;; Expands for keywords such as foreach, while, etc...
 (setq cperl-electric-keywords t)
 
+(setq
+ cperl-indent-level 2
+ cperl-close-paren-offset -1
+ cperl-continued-statement-offset 2
+ cperl-indent-parens-as-block t
+ cperl-tab-always-indent t)
+
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 (message "SML, Standard ML")