· 0 min read
· 1 min read
my @array = $self->array || (); sub array { my @array = (1, 2, 3); return @array; } my @array = array() || (); print "@array"; sub array { my
· 0 min read
· 1 min read
1 2 3 sub update { shift->delete(条件)->
· 3 min read
@nqounetです。 2年ぶりに #Perl鍋 というPerlの
· 0 min read
· 1 min read
1 $ ssh-keygen -t rsa -f ~/.ssh/gitolite-admin 1 $ scp ~/.ssh/gitolite-admin.pub user@host:./admin.pub 1 2 $ sudo mv admin.pub /home/gitolite $ sudo chown gitolite:gitolite /home/gitolite/admin.pub 1 2 $ sudo su -
· 1 min read
├── client.pl ├── cpanfile ├── lib │ └── MyTask │ └── Echo.pm ├── main.pl └── worker.pl
· 1 min read
{ hypnotoad => { accepts => 1000, backlog => 10, clients => 10, graceful_timeout => 20, heartbeat_interval => 5, heartbeat_timeout => 20, listen => [qq{http://*:$ENV{PORT}}], proxy => 1, requests =>
· 0 min read