Help for this page
#/usr/bin/perl -w use strict; ... else {call pgmd; // keep these curly braces call pgmc;}
Output: if (c=e) ... else {call pgmd; // keep these curly braces call pgmc;}