use Proc::Daemon;

Proc::Daemon::Init;

.
.
.

#   The rest of the script follows