use Perl

All the Perl that's Practical to Extract and Report

merlyn
merlyn@stonehenge.com
http://www.stonehenge.com/merlyn/
AOL IM: realmerlyn (Add Buddy, Send Message)
Yahoo! ID: realmerlyn (Add User, Send Message)

PAUSE-ID: MERLYN [cpan.org].
See my home page [stonehenge.com].

Friday May 26, 2006

09:04 AM

[ #29721 ]

Q: "How do I get my pid into a file, simply?"

A: print { open my $out, ">", "pidfile"; $out or die } $$, "\n";

Yes, I like Perl.

The Fine Print: The following comments are owned by whoever posted them. We are not responsible for them in any way.

Without JavaScript enabled, you might want to use the classic discussion system instead. If you login, you can remember this preference.

Odd construction (Score:1)

by Aristotle (5147)

Why not a more traditional form?

print { open my $out, ">", "pidfile" or die "$!"; $out } $$, "\n";

But yeah, that is nifty.
Simpler and Sweeter (Score:1)

by uri (2673)

# this is simpler and clearer IMO use File::Slurp ; write_file( 'pid_file', "$$\n" ) ;