Help for this page

Select Code to Download


  1. or download this
    3104|1|New Years|12/31/2007
3104|1|Holiday|1/1/2008
3104|1|Clinic|1/2/2008
3104|1||1/3/2008
      ^^---- the uninitialized value is here
  2. or download this
    print "$PID|$SID|",shift(@flds),"|$date\n";
  3. or download this
    print "$PID|$SID|",(@flds ? shift(@flds) : ''),"|$date\n";
  4. or download this
    print "$PID|$SID|",shift(@flds),"|$date\n" if $flds[0];
  5. or download this
    my @dates_copy = @dates;