Help for this page

Select Code to Download


  1. or download this
    sub log {
  open (LOG,">>log") || die $!;
  print LOG "$_[0]\n";
  close LOG;
}
  2. or download this
    sub sub-name {
  log("Entering sub-name");
  ...
  log("Leaving sub-name");
}
  3. or download this
    log("querying VAX: $vaxen_query");
execute $vaxen_query;

log("SQL query: $mangled_sql_query");
execute $mangled_sql_query;