Examples of perl programs