use strict; use warnings; open(FILE,'/opt/app1/osa/ebcp/5_5_4/log/AppOsaEbcp1.log') or die "open failed: $!\n";