Help for this page

Select Code to Download


  1. or download this
      open INF, "<$file" or  print "\n\tmy message\n" ; 
                         "\n\tActual error :: $!\n"  ;
                         return 0 ;
  2. or download this
    open INF, "<$file" or do{ print "\n\tmy message\n",
                         "\n\tActual error :: $!\n"  ;
                         return 0 ;
}
  3. or download this
      open INF, "<$file" or (print("\n\tmy message\n", "\n\tActual error :
+: $!\n"), return 0)