use strict; use warnings; use if scalar ( $^O !~ /Win32/ ), 'Proc::Daemon'; use if scalar ( $^O =~ /Win32/ ), 'Win32::Daemon'; print $INC{'Proc/Daemon.pm'}; exit; __END__