alexkuklin: (Default)
use Proc::PID::File;
if ( my $pid = Proc::PID::File->running({dir=>'/opt/project/temp', verify=>1}) ) {
die 'Already running, pid='.$pid;
}

via http://perl.blogit.ru/2006/07/14/11
alexkuklin: (Default)
открыл для себя конструкцию в perl:
$worksheet->set_row($_, 36) for (3..8);

Profile

alexkuklin: (Default)
alexkuklin

January 2016

S M T W T F S
     12
34567 89
10111213141516
17181920212223
24252627282930
31      

Syndicate

RSS Atom

Most Popular Tags

Style Credit

Expand Cut Tags

No cut tags
Page generated Jul. 28th, 2017 12:52 pm
Powered by Dreamwidth Studios