in reply to Perl Script as a Windows Service

Take a look at Win32::Daemon. This question has been asked frequently before, e.g. here and here. Super Search is your friend.
--
print map{chr}unpack(q{A3}x24,q{074117115116032097110111116104101114032080101114108032104097099107101114})

In Section Seekers of Perl Wisdom