in reply to convert shell to perl

It seems like you need to concatenate with a . the string in the if:
if (-e "/local/home/admin/log".`date '+%m%d%y'|sed s/\ /_/g`"_box_50)
(Or something like that)