{
  local *PID;
  open( PID, ">/tmp/mydaemon/$$" ) or warn "pid file: $!\n"
}
[download]

Or use utime if you want to diddle the modification time of an existing file rather than clobbering it. No need to start up an external touch (not to mention an external sh since you used one argument to system :).