#!/usr/bin/perl@a=(Lbzjoftt,Inqbujfodf,Hvcsjt); $b="Lbssz Wbmm";$b =~ y/b-z/a-z/ ;$c = " Tif ". @a ." hsfbu wj" ."suvft pg b qsphsbnnfs" . ":