Result:
found more than 865 distributions - search limited to the first 2001 files matching your query
( run in 3.235 )
App-Netdisco
view release on metacpan or search on metacpan
bin/netdisco-web view on Meta::CPAN
Daemon::Control->new({
name => 'Netdisco Web',
program => \&restarter,
program_args => [
'--disable-keepalive',
($can_drop_priv ? ('--user', $uid, '--group', $gid) : ()),
@args, $netdisco->stringify
],
pid_file => $pid_file,
($foreground ? () : (
App-Netsync
view release on metacpan or search on metacpan
share/mib/CISCO-TC.my view on Meta::CPAN
'fcipPortMaxReTx(49)' - FCIP port went down due to maximum
TCP re-transmissions reached the configured limit.
'fcipPortKeepAliveTimerExpire(50)' - FCIP port went down
due to TCP keep alive timer expired.
'fcipPortPersistTimerExpire(51)' - FCIP port went down due
to TCP persist timer expired.
'fcipPortSrcLinkDown(52)' - FCIP port went down due to
App-PDFLibrarian
view release on metacpan or search on metacpan
share/title_abbr_iso4.csv view on Meta::CPAN
"aliment-";"aliment.";"mul"
"alimony";"n.a.";"eng"
"aliphatic";"n.a.";"eng"
"Alipore";"n.a.";"eng"
"alist-";"alist.";"spa"
"alive";"n.a.";"eng"
"alkali";"n.a.";"dan"
"alkaline";"n.a.";"eng"
"alkalmaz-";"alk.";"hun"
"alkalmazaÌsfejleszt-";"alkfejleszt.";"hun"
"alkalmazaÌstechnika";"alktech.";"hun"
App-PersistentSSH
view release on metacpan or search on metacpan
lib/App/PersistentSSH.pm view on Meta::CPAN
% persisshtent --host your.host.com
=head1 DESCRIPTION
This POE component will keep an SSH control master alive, depending on network status.
It uses the OSX command line tool F<scutil> to get notification on changes to
the C<State:/Network/Global/IPv4> configuration key. Whenever this key is changed
C<scutil -r> will be used to check if the specified host is directly reachable
(without creating a connection using e.g. PPP), and if so spawn F<ssh>.
App-PigLatin
view release on metacpan or search on metacpan
t/files/moby11.txt view on Meta::CPAN
Now, take away the awful fear, and my sensations at
feeling the supernatural hand in mine were very similar,
in their strangeness, to those which I experienced on waking
up and seeing Queequeg's pagan arm thrown round me.
But at length all the past night's events soberly recurred,
one by one, in fixed reality, and then I lay only alive to
the comical predicament. For though I tried to move his arm--
unlock his bridegroom clasp--yet, sleeping as he was, he still
hugged me tightly, as though naught but death should part us twain.
I now strove to rouse him--"Queequeg!"--but his only answer
was a snore. I then rolled over, my neck feeling as if it
t/files/moby11.txt view on Meta::CPAN
in the bed the night before, yet see how elastic our stiff prejudices
grow when love once comes to bend them. For now I liked
nothing better than to have Queequeg smoking by me, even in bed,
because he seemed to be full of such serene household joy then.
I no more felt unduly concerned for the landlord's policy of insurance.
I was only alive to the condensed confidential comfortableness
of sharing a pipe and a blanket with a real friend.
With our shaggy jackets drawn about our shoulders, we now passed
the Tomahawk from one to the other, till slowly there grew
over us a blue hanging tester of smoke, illuminated by the flame
of the new-lit lamp.
t/files/moby11.txt view on Meta::CPAN
for it was almost intolerable, it seemed so painfully and
unnaturally constrained; especially, as in all probability
he had been sitting so for upwards of eight or ten hours,
going too without his regular meals.
"Mrs. Hussey," said I, "he's alive at all events; so leave us,
if you please, and I will see to this strange affair myself."
Closing the door upon the landlady, I endeavored to prevail
upon Queequeg to take a chair; but in vain. There he sat;
and all he could do--for all my polite arts and blandishments--
t/files/moby11.txt view on Meta::CPAN
I was going to ask him some further questions concerning Ahab,
when we heard a noise on deck.
"Holloa! Starbuck's astir," said the rigger. "He's a lively chief
mate that; good man, and a pious; but all alive now, I must turn to."
And so saying he went on deck, and we followed.
It was now clear sunrise. Soon the crew came on board in twos and threes;
the riggers bestirred themselves; the mates were actively engaged;
and several of the shore people were busy in bringing various last
t/files/moby11.txt view on Meta::CPAN
themselves on deck for a considerable time after heaving up the anchor,
but remain over the cabin table, having a farewell merry-making with
their shore friends, before they quit the ship for good with the pilot.
But there was not much chance to think over the matter, for Captain Peleg
was now all alive. He seemed to do most of the talking and commanding,
and not Bildad.
"Aft here, ye sons of bachelors," he cried, as the sailors lingered
at the main-mast. "Mr. Starbuck, drive aft."
t/files/moby11.txt view on Meta::CPAN
you saw a slender rod-like mark, lividly whitish.
It resembled that perpendicular seam sometimes made in the straight,
lofty trunk of a great tree, when the upper lightning tearingly
darts down it, and without wrenching a single twig, peels and
grooves out the bark from top to bottom ere running off into
the soil, leaving the tree still greenly alive, but branded.
Whether that mark was born with him, or whether it was the scar
left by some desperate wound, no one could certainly say.
By some tacit consent, throughout the voyage little
or no allusion was made to it, especially by the mates.
But once Tashtego's senior, an old Gay-Head Indian among the crew,
t/files/moby11.txt view on Meta::CPAN
Such a phiz! But, somehow, next moment I was over the fright.
'What am I about?' says I at last. 'And what business is that of yours,
I should like to know, Mr. Humpback? Do you want a kick?'
By the lord, Flask, I had no sooner said that, than he turned
round his stern to me, bent over, and dragging up a lot of seaweed
he had for a clout--what do you think, I saw?--why thunder alive,
man, his stern was stuck full of marlinspikes, with the points out.
Says I on second thought, 'I guess I won't kick you, old fellow.'
'Wise Stubb,' said he, 'wise Stubb;' and kept muttering it all
the time, a sort of eating of his own gums like a chimney hag.
Seeing he wasn't going to stop saying over his 'wise Stubb,
t/files/moby11.txt view on Meta::CPAN
by an underground passage); these fabulous narrations are almost
fully equalled by the realities of the whalemen.
Forced into familiarity, then, with such prodigies as these;
and knowing that after repeated, intrepid assaults, the White Whale
had escaped alive; it cannot be much matter of surprise that
some whalemen should go still further in their superstitions;
declaring Moby Dick not only ubiquitous, but immortal
(for immortality is but ubiquity in time); that though groves
of spears should be planted in his flanks, he would still swim
away unharmed; or if indeed he should ever be made to spout
t/files/moby11.txt view on Meta::CPAN
"Oh, I don't mind'em, sir," said Archy; "I knew it all before now.
Didn't I hear 'em in the hold? And didn't I tell Cabaco here of it?
What say ye, Cabaco? They are stowaways, Mr. Flask."
"Pull, pull, my fine hearts-alive; pull, my children;
pull, my little ones," drawlingly and soothingly sighed Stubb
to his crew, some of whom still showed signs of uneasiness.
"Why don't you break your backbones, my boys? What is it you stare at?
Those chaps in yonder boat? Tut! They are only five more hands
come to help us never mind from where the more the merrier.
Pull, then, do pull; never mind the brimstone devils are good
fellows enough. So, so; there you are now; that's the stroke
for a thousand pounds; that's the stroke to sweep the stakes!
Hurrah for the gold cup of sperm oil, my heroes!
Three cheers, men--all hearts alive! Easy, easy; don't be in a hurry--
don't be in a hurry. Why don't you snap your oars, you rascals?
Bite something, you dogs! So, so, so, then:--softly, softly!
That's it--that's it! long and strong. Give way there, give way!
The devil fetch ye, ye ragamuffin rapscallions; ye are all asleep.
Stop snoring, ye sleepers, and pull. Pull, will ye? pull,
t/files/moby11.txt view on Meta::CPAN
"Look at that chap now," philosophically drawled Stubb, who, with his
unlighted short pipe, mechanically retained between his teeth,
at a short distance, followed after--"He's got fits, that Flask has.
Fits? yes, give him fits--that's the very word--pitch fits into 'em.
Merrily, merrily, hearts-alive. Pudding for supper, you know;--
merry's the word. Pull, babes--pull, sucklings--pull, all.
But what the devil are you hurrying about? Softly, softly,
and steadily, my men. Only pull, and keep pulling; nothing more.
Crack all your backbones, and bite your knives in two--that's all.
Take it easy--why don't ye take it easy, I say, and burst all your
t/files/moby11.txt view on Meta::CPAN
and hence as the boat steerer or harpooneer is of the number,
that subordinate is the steersman upon the occasion, and the captain,
having no place to sit in, is pulled off to his visit all standing
like a pine tree. And often you will notice that being conscious
of the eyes of the whole visible world resting on him from
the sides of the two ships, this standing captain is all alive
to the importance of sustaining his dignity by maintaining his legs.
Nor is this any very easy matter; for in his rear is the immense
projecting steering oar hitting him now and then in the small of
his back, the after-oar reciprocating by rapping his knees in front.
He is thus completely wedged before and behind, and can only
t/files/moby11.txt view on Meta::CPAN
All silence of cautiousness was therefore no longer of use.
Paddles were dropped, and oars came loudly into play.
And still puffing at his pipe, Stubb cheered on his crew
to the assault.
Yes, a mighty change had come over the fish. All alive to his jeopardy,
he was going "head out"; that part obliquely projecting from the mad
yeast which he brewed.*
*It will be seen in some other place of what a very light substance
t/files/moby11.txt view on Meta::CPAN
the whirlpool; the suddenly relieved hull rolled away from it,
to far down her glittering copper; and all caught their breath,
as half swinging--now over the sailors' heads, and now
over the water--Daggoo, through a thick mist of spray,
was dimly beheld clinging to the pendulous tackles, while poor,
buried-alive Tashtego was sinking utterly down to the bottom
of the sea! But hardly had the blinding vapor cleared away,
when a naked figure with a boardingsword in his hand,
was for one swift moment seen hovering over the bulwarks.
The next, a loud splash announced that my brave Queequeg had
dived to the rescue. One packed rush was made to the side,
t/files/moby11.txt view on Meta::CPAN
"That drove the spigot out of him!" cried Stubb. "'Tis July's
immortal Fourth; all fountains must run wine today!
Would now, it were old Orleans whiskey, or old Ohio, or unspeakable
old Monongahela! Then, Tashtego, lad, I'd have ye hold a canakin
to the jet, and we'd drink round it! Yea, verily, hearts alive,
we'd brew choice punch in the spread of his spout-hole there,
and from that live punch-bowl quaff the living stuff."
Again and again to such gamesome talk, the dexterous dart is repeated,
the spear returning to its master like a greyhound held in skilful leash.
t/files/moby11.txt view on Meta::CPAN
ringed horizon began to expand around him miserably.
By the merest chance the ship itself at last rescued him;
but from that hour the little negro went about the deck an idiot;
such, at least, they said he was. The sea had jeeringly kept
his finite body up, but drowned the infinite of his soul.
Not drowned entirely, though. Rather carried down alive
to wondrous depths, where strange shapes of the unwarped
primal world glided to and fro before his passive eyes;
and the miser-merman, Wisdom, revealed his hoarded heaps;
and among the joyous, heartless, ever-juvenile eternities,
Pip saw the multitudinous, God-omnipresent, coral insects,
t/files/moby11.txt view on Meta::CPAN
I'll get the almanack; and as I have heard devils can be raised
with Daboll's arithmetic, I'll try my hand at raising a meaning
out of these queer curvicues here with the Massachusetts calendar.
Here's the book. Let's see now. Signs and wonders;
and the sun, he's always among 'em. Hem, hem, hem; here they are--
here they go--all alive: Aries, or the Ram; Taurus, or the Bull
and Jimimi! here's Gemini himself, or the Twins. Well; the sun
he wheels among 'em. Aye, here on the coin he's just crossing
the threshold between two of twelve sitting-rooms all in a ring.
Book! you lie there; the fact is, you books must know your places.
You'll do to give us the bare words and facts, but we come
t/files/moby11.txt view on Meta::CPAN
here's the battering-ram, Capricornus, or the Goat; full tilt,
he comes rushing, and headlong we are tossed; when Aquarius,
or the Waterbearer, pours out his whole deluge and drowns us;
and to wind up with Pisces, or the Fishes, we sleep.
There's a sermon now, writ in high heaven, and the sun goes through
it every year, and yet comes out of it all alive and hearty.
Jollily he, aloft there, wheels through toil and trouble; and so,
alow here, does jolly Stubb. Oh, jolly's the word for aye!
Adieu, Doubloon! But stop; here comes little King-Post;
dodge round the try-works, now, and let's hear what he'll have
to say. There; he's before it; he'll out with something presently.
t/files/moby11.txt view on Meta::CPAN
I jumped into my first mate's boat--Mr. Mounttop's here
(by the way, Captain--Mounttop; Mounttop--the captain);--
as I was saying, I jumped into Mounttop's boat, which, d'ye see,
was gunwale and gunwale with mine, then; and snatching the
first harpoon, let this old great-grandfather have it. But, Lord,
look you, sir--hearts and souls alive, man--the next instant,
in a jiff, I was blind as a bat--both eyes out--all befogged
and bedeadened with black foam--the whale's tail looming straight
up out of it, perpendicular in the air, like a marble steeple.
No use sterning all, then; but as I was groping at midday,
with a blinding sun, all crown-jewels; as I was groping, I say,
t/files/moby11.txt view on Meta::CPAN
to bed, half seas over, about three o'clock in the morning.
Oh, ye stars! he sat up with me indeed, and was very severe
in my diet. Oh! a great watcher, and very dietetically severe,
is Dr. Bunger. (Bunger, you dog, laugh out! why don't ye?
You know you're a precious jolly rascal.) But, heave ahead, boy,
I'd rather be killed by you than kept alive by any other man."
"My captain, you must have ere this perceived, respected sir"--
said the imperturbable godly-looking Bunger, slightly bowing
to Ahab--"is apt to be facetious at times; he spins us many
clever things of that sort. But I may as well say--en passant,
t/files/moby11.txt view on Meta::CPAN
of whales, their probably attaining the age of a century and more,
therefore at any one period of time, several distinct adult
generations must be contemporary. And what this is, we may soon
gain some idea of, by imagining all the grave-yards, cemeteries,
and family vaults of creation yielding up the live bodies of all
the men, women, and children who were alive seventy-five years ago;
and adding this countless host to the present human population
of the globe.
Wherefore, for all these things, we account the whale immortal
in his species, however perishable in his individuality.
t/files/moby11.txt view on Meta::CPAN
of thirty men and more, if this ship come to any deadly harm;
and come to deadly harm, my soul swears this ship will,
if Ahab have his way. If, then, he were this instant--
put aside, that crime would not be his. Ha! is he muttering
in his sleep? Yes, just there,--in there, he's sleeping.
Sleeping? aye, but still alive, and soon awake again.
I can't withstand thee, then, old man. Not reasoning;
not remonstrance; not entreaty wilt thou hearken to;
all this thou scornest. Flat obedience to thy own flat commands,
this is all thou breathest. Aye, and say'st the men have vow'd
thy vow; say'st all of us are Ahabs. Great God forbid!--
t/files/moby11.txt view on Meta::CPAN
are these barbs; and I swear to temper them triply in that hot place
behind the fin, where the White Whale most feels his accursed life!"
"Then God keep thee, old man--see'st thou that"--
pointing to the hammock--"I bury but one of five stout men,
who were alive only yesterday; but were dead ere night.
Only that one I bury; the rest were buried before they died;
you sail upon their tomb." Then turning to his crew--"Are
ye ready there? place the plank then on the rail, and lift
the body; so, then--Oh! God"--advancing towards the hammock
with uplifted hands--"may the resurrection and the life-"
t/files/moby11.txt view on Meta::CPAN
fit emblem of the dry nourishment of my soul!--when the poorest
landsman has had fresh fruit to his daily hand, and broken
the world's fresh bread to my mouldy crusts--away, whole oceans away,
from that young girl-wife I wedded past fifty, and sailed for
Cape Horn the next day, leaving but one dent in my marriage pillow--
wife? wife?--rather a widow with her husband alive? Aye, I widowed
that poor girl when I married her, Starbuck; and then,
the madness, the frenzy, the boiling blood and the smoking brow,
with which, for a thousand lowerings old Ahab has furiously,
foamingly chased his prey--more a demon than a man!--aye, aye! what
a forty years' fool--fool--old fool, has old Ahab been!
t/files/moby11.txt view on Meta::CPAN
and from his body being submerged beneath the boat, he could not be
darted at from the bows, for the bows were almost inside of him,
as it were; and while the other boats involuntarily paused,
as before a quick crisis impossible to withstand, then it was that
monomaniac Ahab, furious with this tantalizing vicinity of his foe,
which placed him all alive and helpless in the very jaws he hated;
frenzied with all this, he seized the long bone with his
naked hands, and wildly strove to wrench it from its gripe.
As now he thus vainly strove, the jaw slipped from him;
the frail gunwales bent in, collapsed, and snapped,
as both jaws, like an enormous shears, sliding further aft,
t/files/moby11.txt view on Meta::CPAN
"But at every bite, sir, the thin blades grow smaller and smaller!"
"They will last long enough! pull on!--But who can tell"--
he muttered--"whether these sharks swim to feast on the whale
or on Ahab?--But pull on! Aye, all alive, now--we near him.
The helm! take the helm! let me pass,"--and so saying two of the
oarsmen helped him forward to the bows of the still flying boat.
At length as the craft was cast to one side, and ran ranging
along with the White Whale's flank, he seemed strangely
App-Pod
view release on metacpan or search on metacpan
t/cpan/Mojo2/UserAgent.pm view on Meta::CPAN
my $c = $self->{connections}{$id} =
{ cb => $cb, ioloop => $loop, tx => $old };
# CONNECT failed
return $self->_error( $id, 'Proxy connection failed' )
if $tx->error || !$tx->res->is_success || !$tx->keep_alive;
# Start real transaction without TLS upgrade
return $self->_process( $id )
unless $tx->req->url->protocol eq 'https';
t/cpan/Mojo2/UserAgent.pm view on Meta::CPAN
my ( $proto, $host, $port ) = $self->transactor->endpoint( $tx );
my $id;
if ( $id = $self->_dequeue( $loop, "$proto:$host:$port", 1 ) ) {
warn "-- Reusing connection $id ($proto://$host:$port)\n" if DEBUG;
@{ $self->{connections}{$id} }{qw(cb tx)} = ( $cb, $tx );
$tx->kept_alive( 1 ) unless $tx->connection;
$self->_process( $id );
return $id;
}
# CONNECT request to proxy required
t/cpan/Mojo2/UserAgent.pm view on Meta::CPAN
# Connection close
my $c = $self->{connections}{$id};
my $tx = delete $c->{tx};
my $max = $self->max_connections;
return $self->_remove( $id )
if $close || !$tx || !$max || !$tx->keep_alive || $tx->error;
# Keep connection alive
my $queue = $self->{queue}{ $c->{ioloop} } //= [];
$self->_remove( shift( @$queue )->[1] ) while @$queue && @$queue >= $max;
push @$queue, [ join( ':', $self->transactor->endpoint( $tx ) ), $id ];
}
t/cpan/Mojo2/UserAgent.pm view on Meta::CPAN
Mojo::IOLoop->start unless Mojo::IOLoop->is_running;
=head1 DESCRIPTION
L<Mojo::UserAgent> is a full featured non-blocking I/O HTTP and WebSocket user agent, with IPv6, TLS, SNI, IDNA,
HTTP/SOCKS5 proxy, UNIX domain socket, Comet (long polling), Promises/A+, keep-alive, connection pooling, timeout,
cookie, multipart, gzip compression and multiple event loop support.
All connections will be reset automatically if a new process has been forked, this allows multiple processes to share
the same L<Mojo::UserAgent> object safely.
t/cpan/Mojo2/UserAgent.pm view on Meta::CPAN
=head2 max_connections
my $max = $ua->max_connections;
$ua = $ua->max_connections(5);
Maximum number of keep-alive connections that the user agent will retain before it starts closing the oldest ones,
defaults to C<5>. Setting the value to C<0> will prevent any connections from being kept alive.
=head2 max_redirects
my $max = $ua->max_redirects;
$ua = $ua->max_redirects(3);
App-PureProxy
view release on metacpan or search on metacpan
script/pureproxy.pl view on Meta::CPAN
=head2 --ipv6
Enables IPv6 support. The L<IO::Socket::IP> module is required. (default: 1
if L<IO::Socket::IP> is available or 0 otherwise)
=head2 --keepalive-timeout
Timeout for persistent connections. (default: 2)
=head2 -L, --loader
script/pureproxy.pl view on Meta::CPAN
=head2 --main-process-delay
The Starlight nor Thrall do not synchronize their processes and require a
small delay in main process so it doesn't consume all CPU. (default: 0.1)
=head2 --max-keepalive-reqs
Max. number of requests allowed per single persistent connection. If set to
one, persistent connections are disabled. (default: 1)
=head2 --max-reqs-per-child
App-Raider
view release on metacpan or search on metacpan
.claude/skills/perl-io-async-future/SKILL.md view on Meta::CPAN
}
```
**Rules:**
- Store the *whole chain* on the object (`$self->{_reconnect_future}`), not just the leaf.
- `weaken` `$self` inside callbacks — otherwise the chain holds the object alive forever.
- Always `delete $self->{_reconnect_future}` in both `on_done` and `on_fail`, or you'll guard out future reconnects with `return if $self->{_reconnect_future}`.
- On disconnect, **cancel the old `_connect_future`** so its async sub unwinds:
```perl
if (my $f = delete $self->{_connect_future}) {
$f->fail("disconnected: $reason") unless $f->is_ready;
.claude/skills/perl-io-async-future/SKILL.md view on Meta::CPAN
**`then` vs `on_done`:**
- `then` returns a *new* Future; the callback returns a Future to chain. Use for control flow.
- `on_done` returns the *same* Future; callback return value is discarded. Use for side-effects/observation.
**Protective composition** (Future ≥ 0.51): pass extra siblings via `also =>` to keep them alive without making cancellation propagate:
```perl
Future->needs_all($f1, also => $f2, $f3);
```
---
App-Regather
view release on metacpan or search on metacpan
lib/App/Regather.pm view on Meta::CPAN
print "close $self->cf->get(qw(core pid_file)) (opened for reading) failed: $!\n\n";
exit 1;
};
if ( kill(0, $pid) ) {
print "Doing nothing\npidfile $self->cf->get(qw(core pid_file)) of the proces with pid $pid, exists and the very process is alive\n\n";
exit 1;
}
$orphaned_pid_mtime = strftime( $self->o('ts_fmt'), localtime( (stat( $self->cf->get(qw(core pid_file)) ))[9] ));
if ( unlink $self->cf->get(qw(core pid_file)) ) {
App-Relate-Complex
view release on metacpan or search on metacpan
t/dat/tree/subdir/#groovy.txt# view on Meta::CPAN
wives of HOLLYWOOD MOVIE MOGULS encased in PLEXIGLASS CARS
and being approached by SMALL BOYS selling FRUIT..
Maybe this could be the reason for some problems at home?
It's a lot of fun being alive... I wonder if my bed is made?!?
Are you sure that you wonder if your bed is made?
Here we are in America... when do we collect unemployment?
t/dat/tree/subdir/#groovy.txt# view on Meta::CPAN
wives of HOLLYWOOD MOVIE MOGULS encased in PLEXIGLASS CARS
and being approached by SMALL BOYS selling FRUIT..
Maybe this could be the reason for some problems at home?
It's a lot of fun being alive... I wonder if my bed is made?!?
Are you sure that you wonder if your bed is made?
Here we are in America... when do we collect unemployment?
t/dat/tree/subdir/#groovy.txt# view on Meta::CPAN
this?
It's strange, but I'm only TRULY ALIVE when I'm covered in POLKA DOTS
and TACO SAUCE...
Does the fact that you are only truly alive when you are covered
in polka dots and taco sauce explain anything else?
Uh-oh!! I'm having TOO MUCH FUN!!
Is it because of your inhibitions that you say you are having too
t/dat/tree/subdir/#groovy.txt# view on Meta::CPAN
I don't understand.
Actually, what I'd like is a little toy spaceship!!
You mentioned that you are only truly alive when you are covered
in polka dots and taco sauce?
Make me look like LINDA RONSTADT again!!
Perhaps your sex life are because of this.
t/dat/tree/subdir/#groovy.txt# view on Meta::CPAN
Why do you say that?
Yow! I want my nose in lights!
Earlier you said you are only truly alive when you are covered in
polka dots and taco sauce?
-- In 1962, you could buy a pair of SHARKSKIN SLACKS, with a
``Continental Belt,'' for $10.99!!
t/dat/tree/subdir/#groovy.txt# view on Meta::CPAN
Is it because of your plans that you say heh heh?
Hold the MAYO & pass the COSMIC AWARENESS...
You mentioned that you are only truly alive when you are covered
in polka dots and taco sauce?
Somewhere in DOWNTOWN BURBANK a prostitute is OVERCOOKING a LAMB CHOP!!
Tell me more about your feelings about your sexual partner.
t/dat/tree/subdir/#groovy.txt# view on Meta::CPAN
unimpeachable?
Is a tattoo real, like a curb or a battleship?
Or are we suffering in Safeway?
You mentioned that you are only truly alive when you are covered
in polka dots and taco sauce?
HOW could a GLASS be YELLING??
When did you first know that could a glass be yelling?
t/dat/tree/subdir/#groovy.txt# view on Meta::CPAN
this?
On SECOND thought, maybe I'll heat up some BAKED BEANS and
watch REGIS PHILBIN.. It's GREAT to be ALIVE!!
Are you sure that it's great to be alive?
.. My vaseline is RUNNING...
You mentioned that do I know what it means to be truly one with
my booth?
t/dat/tree/subdir/#groovy.txt# view on Meta::CPAN
What makes you think are you there yet?
Sometimes a TABOO is just a good CIGAR -- or a
rare STEAK -- or a dry MARTINI!
Why do you say you are only truly alive when you are covered in
polka dots and taco sauce?
Did YOU find a DIGITAL WATCH in YOUR box of VELVEETA?
Perhaps this is caused by any hobbies you have?
t/dat/tree/subdir/#groovy.txt# view on Meta::CPAN
The Korean War must have been fun.
Possibly the people you hang around with are caused by this.
It's a lot of fun being alive... I wonder if my bed is made?!?
Is it because of problems at school that you say you wonder if
your bed is made?
Have my two-tone, 1958 Nash METRO brought around..
t/dat/tree/subdir/#groovy.txt# view on Meta::CPAN
inside me like a BARREL of runny CHOPPED LIVER! Or maybe he'd
like to PSYCHOLOGICALLY TERRORIZE ME until I have no objection
to a RIGHT-WING MILITARY TAKEOVER of my apartment!! I guess
I should call AL PACINO!
Why do you say you are only truly alive when you are covered in
polka dots and taco sauce?
I need "RONDO".
Is it because of the people you hang around with that you are
t/dat/tree/subdir/#groovy.txt# view on Meta::CPAN
Have you been scared of that?
Loni Anderson's hair should be LEGALIZED!!
What makes you think you are only truly alive when you are
covered in polka dots and taco sauce?
... Blame it on the BOSSA NOVA!!!
How do you reconcile hangups you have?
t/dat/tree/subdir/#groovy.txt# view on Meta::CPAN
Are you sure that one fishwich coming up?
Are we THERE yet??
Earlier you said you are only truly alive when you are covered in
polka dots and taco sauce?
Used staples are good with SOY SAUCE!
How do you reconcile hangups you have?
t/dat/tree/subdir/#groovy.txt# view on Meta::CPAN
Content: 80% POLYESTER, 20% DACRON.. The waitress's
UNIFORM sheds TARTAR SAUCE like an 8'' by 10'' GLOSSY..
How does it feel to want?
It's a lot of fun being alive... I wonder if my bed is made?!?
What makes you believe you were happy?
I want to kill everyone here with a cute colorful Hydrogen Bomb!!
App-ReportPrereqs
view release on metacpan or search on metacpan
'date' => 'Thu, 07 Jun 2018 20:15:24 GMT',
'x-github-request-id' => '747E:5754:48FEFA:4A566D:5B19925C',
'strict-transport-security' => 'max-age=31536000',
'x-geo-block-list' => q{},
'vary' => 'Authorization,Accept-Encoding',
'connection' => 'keep-alive',
'accept-ranges' => 'bytes',
'content-length' => '7840',
'x-xss-protection' => '1; mode=block',
'expires' => 'Thu, 07 Jun 2018 20:20:24 GMT',
'x-timer' => 'S1528402525.672062,VS0,VE96',
App-RetroPAN
view release on metacpan or search on metacpan
lib/App/RetroPAN.pm view on Meta::CPAN
use Cpanel::JSON::XS qw/ encode_json decode_json /;
our $VERSION = '0.03';
my $ua = LWP::UserAgent->new( keep_alive => 2, agent => "retropan/$VERSION" );
sub find_module_dependencies {
my ($au, $dist) = @_;
my $q = {
App-RoboBot
view release on metacpan or search on metacpan
lib/App/RoboBot/Network/Slack.pm view on Meta::CPAN
is => 'rw',
isa => 'AnyEvent::SlackRTM',
traits => [qw( SetOnce )],
);
has 'keepalive' => (
is => 'rw',
traits => [qw( SetOnce )],
);
has 'ping_payload' => (
lib/App/RoboBot/Network/Slack.pm view on Meta::CPAN
$self->client(AnyEvent::SlackRTM->new(
$self->token
));
$self->client->on( 'hello' => sub {
$self->keepalive(AnyEvent->timer(
interval => 60,
cb => sub { $self->reconnect if $self->client->finished }
));
});
App-RouterColorizer
view release on metacpan or search on metacpan
t/data/04-arista.input view on Meta::CPAN
% Invalid input
kswXX#\swXX#show ip bgp neigh
swXX#show ip bgp neighbors
[?1h=
BGP neighbor is 192.0.2.12, remote AS 65000, internal link
BGP version 4, remote router ID 0.0.0.0, VRF default
Last read never, last write never
Hold time is 0, keepalive interval is 0 seconds
Configured hold time is 180, keepalive interval is 60 seconds
Hold timer is inactive
Keepalive timer is inactive
Connect timer is active, time left: 00:00:21
Connection interval is 20 seconds
Failed connection attempts is 88804
Idle-restart timer is inactive
BGP state is Connect
t/data/04-arista.input view on Meta::CPAN
Message Statistics:
Sent Rcvd
Opens: 0 0
Notifications: 0 0
Updates: 0 0
Keepalives: 0 0
Route Refresh: 0 0
Total messages: 0 0
Prefix Statistics:
Sent Rcvd Best Paths Best ECMP Paths
IPv4 Unicast: 0 0 0 0
t/data/04-arista.input view on Meta::CPAN
BGP neighbor is 192.0.2.1, remote AS 65000, internal link
Description: "Raku BGP Test Session"
BGP version 4, remote router ID 0.0.0.0, VRF default
Last read never, last write never
Hold time is 0, keepalive interval is 0 seconds
Configured hold time is 180, keepalive interval is 60 seconds
Hold timer is inactive
Keepalive timer is inactive
Connect timer is active, time left: 00:00:04
Connection interval is 20 seconds
Failed connection attempts is 88813
Idle-restart timer is inactive
BGP state is Connect
t/data/04-arista.input view on Meta::CPAN
Message Statistics:
Sent Rcvd
Opens: 0 0
Notifications: 0 0
Updates: 0 0
Keepalives: 0 0
Route Refresh: 0 0
Total messages: 0 0
Prefix Statistics:
Sent Rcvd Best Paths Best ECMP Paths
IPv4 Unicast: 0 0 0 0
t/data/04-arista.input view on Meta::CPAN
Slow-start Threshold (ssthresh): 7
BGP neighbor is 192.0.2.3, remote AS 65000, internal link
BGP version 4, remote router ID 192.0.2.3, VRF default
Last read 00:00:20, last write 00:00:46
Hold time is 180, keepalive interval is 60 seconds
Configured hold time is 180, keepalive interval is 60 seconds
Hold timer is active, time left: 00:01:39
Keepalive timer is active, time left: 00:00:06
Connect timer is inactive
Idle-restart timer is inactive
BGP state is Established, up for 52d04h
Number of transitions to established: 5
Last state was OpenConfirm
t/data/04-arista.input view on Meta::CPAN
Message Statistics:
Sent Rcvd
Opens: 5 5
Notifications: 4 0
Updates: 0 576
Keepalives: 343072 333888
Route Refresh: 0 0
Total messages: 343081 334469
Prefix Statistics:
Sent Rcvd Best Paths Best ECMP Paths
IPv4 Unicast: 0 2 2 0
t/data/04-arista.input view on Meta::CPAN
Advertised Recv Window (rcv_space): 29381
BGP neighbor is 192.0.2.17, remote AS 65000, internal link
BGP version 4, remote router ID 192.0.2.17, VRF default
Last read 00:00:02, last write 00:00:15
Hold time is 180, keepalive interval is 60 seconds
Configured hold time is 180, keepalive interval is 60 seconds
Hold timer is active, time left: 00:01:04
Keepalive timer is active, time left: 00:00:40
Connect timer is inactive
Idle-restart timer is inactive
BGP state is Established, up for 23d14h
Number of transitions to established: 4
Last state was OpenConfirm
t/data/04-arista.input view on Meta::CPAN
[3m --More-- [23m[K
[K Message Statistics:
Sent Rcvd
Opens: 4 4
Notifications: 0 0
Updates: 0 1300
Keepalives: 343161 333862
Route Refresh: 0 0
Total messages: 343165 335166
Prefix Statistics:
Sent Rcvd Best Paths Best ECMP Paths
IPv4 Unicast: 0 13 11 0
App-SilverSplash
view release on metacpan or search on metacpan
conf/httpd.conf.tmpl view on Meta::CPAN
PidFile [% cfg.sl_tmp %]/sl_cp.pid
DocumentRoot [% cfg.sl_httpd_root %]/htdocs/sl
TypesConfig [% cfg.sl_root %]/conf/mime.types
User [% cfg.sl_apache_user %]
Group [% cfg.sl_apache_group %]
KeepAlive [% cfg.sl_apache_keepalive %]
MaxKeepAliveRequests 0
KeepAliveTimeout 300
MinSpareServers [% cfg.sl_apache_min_spare_servers %]
MaxSpareServers [% cfg.sl_apache_max_spare_servers %]
StartServers [% cfg.sl_apache_start_servers %]
App-SlideServer
view release on metacpan or search on metacpan
lib/App/SlideServer.pm view on Meta::CPAN
$c->send({ json => { roles => [ keys %roles ] } });
$c->on(json => sub($c, $msg, @) { $c->app->on_viewer_message($c, $msg) });
$c->on(finish => sub($c, @) { $c->app->on_viewer_disconnect($c) });
$c->inactivity_timeout(3600);
#my $keepalive= Mojo::IOLoop->recurring(60 => sub { $viewers{$id}->send([1, 0, 0, 0, WS_PING, '']); });
#$c->stash(keepalive => $keepalive);
}
sub on_viewer_message($self, $c, $msg) {
my $id= $c->req->request_id;
lib/App/SlideServer.pm view on Meta::CPAN
# if ($c->stash('roles') =~ /\b
}
sub on_viewer_disconnect($self, $c) {
my $id= $c->req->request_id;
#Mojo::IOLoop->remove($keepalive);
delete $self->viewers->{$id};
$self->update_published_state(viewer_count => scalar keys $self->viewers->%*);
}
sub on_page_changed($self) {
App-SocialCalc-Multiplayer
view release on metacpan or search on metacpan
socialcalc/third-party/lib/PocketIO/Transport/BasePolling.pm view on Meta::CPAN
return [
200,
[ 'Content-Type' => 'text/plain',
'Content-Length' => length($body),
'Connection' => 'keep-alive'
],
[$body]
];
}
App-SocialSKK
view release on metacpan or search on metacpan
inc/Net/Ping/External.pm view on Meta::CPAN
my $command = "ping -l $args{size} -n $args{count} -w $args{timeout} $args{host}";
print "$command\n" if $DEBUG;
my $result = `$command`;
return 1 if $result =~ /time.*ms/;
return 1 if $result =~ /TTL/;
return 1 if $result =~ /is alive/; # ppt (from CPAN) ping
# return 1 if $result !~ /\(100%/; # 100% packages lost
return 0;
}
# Mac OS X 10.2 ping does not handle -w timeout now does it return a
App-SpreadRevolutionaryDate
view release on metacpan or search on metacpan
lib/App/SpreadRevolutionaryDate/MsgMaker/Telechat.pm view on Meta::CPAN
'0612' => ['poudingue', 'poudingues', 'm'],
'0613' => ['pandiculation', 'pandiculations', 'f'],
'0614' => ['gaudriole', 'gaudrioles', 'f'],
'0615' => ['chenapan', 'chenapans', 'm'],
'0616' => ['carabistouille', 'carabistouilles', 'f'],
'0617' => ['baliverne', 'balivernes', 'f'],
'0618' => ['histrion', 'histrions', 'm'],
'0619' => ['babiole', 'babioles', 'f'],
'0620' => ['pétouille', 'pétouilles', 'f'],
'0621' => ['baragouin', 'baragouins', 'm'],
'0622' => ['patatras', 'patatras', 'm'],
lib/App/SpreadRevolutionaryDate/MsgMaker/Telechat.pm view on Meta::CPAN
'0612' => ['poudingue', 'poudingues', 'm'],
'0613' => ['pandiculation', 'pandiculations', 'f'],
'0614' => ['gaudriole', 'gaudrioles', 'f'],
'0615' => ['chenapan', 'chenapans', 'm'],
'0616' => ['carabistouille', 'carabistouilles', 'f'],
'0617' => ['baliverne', 'balivernes', 'f'],
'0618' => ['histrion', 'histrions', 'm'],
'0619' => ['babiole', 'babioles', 'f'],
'0620' => ['pétouille', 'pétouilles', 'f'],
'0621' => ['baragouin', 'baragouins', 'm'],
'0622' => ['patatras', 'patatras', 'm'],
App-Stacktrace
view release on metacpan or search on metacpan
t/unthreaded.t view on Meta::CPAN
foo( $v );
}
else {
syswrite $script_wr, '.';
while (1) {
my $pstack_ppid_alive = kill 0, $pstack_ppid;
my $script_ppid_alive = kill 0, $script_ppid;
print "# Alive top @{[time]}: $pstack_ppid_alive middle: $script_ppid_alive\n";
if ($pstack_ppid_alive && $script_ppid_alive) {
select undef, undef, undef, 1;
}
else {
exit;
}
App-SuperviseMe
view release on metacpan or search on metacpan
lib/App/SuperviseMe.pm view on Meta::CPAN
}
sub _signal_all_cmds {
my ($self, $signal, $cv) = @_;
$self->_debug("Received signal $signal");
my $is_any_alive = 0;
for my $cmd (@{ $self->{cmds} }) {
next unless my $pid = $cmd->{pid};
$self->_debug("... sent signal $signal to $pid");
$is_any_alive++;
kill($signal, $pid);
}
return if $cv and $is_any_alive;
$self->_progress('Exiting...');
$cv->send if $cv;
}
App-Sv
view release on metacpan or search on metacpan
lib/App/Sv.pm view on Meta::CPAN
sub _signal_all_svc {
my ($self, $sig, $cv) = @_;
my $debug = $self->{log}->logger(8);
$debug->("Received signal $sig");
my $is_any_alive = 0;
foreach my $key (keys %{ $self->{run} }) {
my $svc = $self->{run}->{$key};
next unless my $pid = $svc->{pid};
$debug->("... sent signal $sig to pid $pid");
$is_any_alive++;
kill($sig, $pid);
}
return if $cv and $is_any_alive;
$debug->('Exiting...');
$cv->send if $cv;
}
App-Tel
view release on metacpan or search on metacpan
lib/App/Tel/Expect.pm view on Meta::CPAN
CONNECT_LOOP:
# Go until we have a reason to stop
while (1) {
# test each handle to see if it's still alive.
foreach my $read_handle (@handles) {
waitpid( ${*$read_handle}{exp_Pid}, WNOHANG )
if ( exists( ${*$read_handle}{exp_Pid} )
and ${*$read_handle}{exp_Pid} );
if ( exists( ${*$read_handle}{exp_Pid} )
App-Templer
view release on metacpan or search on metacpan
lib/Templer/Plugin/Factory.pm view on Meta::CPAN
to expand variables.
L<Templer::Plugin::ShellCommand>, L<Templer::Plugin::FileGlob>, and
L<Templer::Plugin::FileContents> are examples of such plugins.
NOTE: The plugin is instantiated immediately, and kept alive for the duration
of a templer-run.
=cut
sub register_plugin
App-Twitch
view release on metacpan or search on metacpan
lib/App/Twitch.pm view on Meta::CPAN
MooseX::Daemonize
);
use POE qw(
Component::Client::HTTP
Component::Client::Keepalive
Component::FeedAggregator
Component::WWW::Shorten
);
use HTTP::Request;
lib/App/Twitch.pm view on Meta::CPAN
isa => 'Str',
traits => [ 'NoGetopt' ],
default => sub { 'http' },
);
has _keepalive => (
isa => 'POE::Component::Client::Keepalive',
is => 'ro',
traits => [ 'NoGetopt' ],
lazy => 1,
default => sub {
my ( $self ) = @_;
$self->logger->debug($self->logger_prefix.'Startup POE::Component::Client::Keepalive');
POE::Component::Client::Keepalive->new(
keep_alive => 20, # seconds to keep connections alive
max_open => 100, # max concurrent connections - total
max_per_host => 100, # max concurrent connections - per host
timeout => 10, # max time (seconds) to establish a new connection
)
},
lib/App/Twitch.pm view on Meta::CPAN
$self->logger->info($self->logger_prefix.'Startup HTTP Service...');
POE::Component::Client::HTTP->spawn(
Agent => $self->http_agent,
Alias => $self->_http_alias,
Timeout => 30,
ConnectionManager => $self->_keepalive,
FollowRedirects => 5,
);
$self->_max_feeds_count;
my $running_config_dumpfile = $self->tmpdir.'/'.$self->configfile;
$running_config_dumpfile =~ s/\.yml/\.running_config\.yml/;
App-VirtualBoxUtils
view release on metacpan or search on metacpan
lib/App/VirtualBoxUtils.pm view on Meta::CPAN
# return [304,
# $num_start_requests ? "All browsers already have processes" :
# "Not ${which_action}ing any browsers"];
# }
# my (%alive, %not_alive);
# if ($args{-dry_run}) {
# %alive = %started;
# } else {
# for my $wait_time (2, 5, 10) {
# %alive = ();
# %not_alive = ();
# log_trace "Checking if the started browsers are alive ...";
# for my $browser (keys %pbs) {
# if ($pbs{$browser}->alive) {
# $alive{$browser}++;
# } else {
# $not_alive{$browser}++;
# }
# }
# last if scalar(keys %alive) == $num_started;
# }
# }
# my $num_alive = keys %alive;
# my $num_not_alive = keys %not_alive;
# my $status;
# my $reason;
# my $msg;
# my $verb_started = $which_action eq 'restart' ? 'Started/restarted' : 'Started';
# if ($num_alive == $num_started) {
# $status = 200;
# $reason = "OK";
# $msg = "$verb_started ".join(", ", sort keys %alive);
# } elsif ($num_alive == 0) {
# $status = 500;
# $reason = $msg = "Can't start any browser (".join(", ", %not_alive).")";
# } else {
# $status = 200;
# $reason = "OK";
# $msg = "$verb_started ".join(", ", sort keys %alive)."; but failed to start ".
# join(", ", sort keys %not_alive);
# }
# $fail{$_} //= "Can't start" for keys %not_alive;
# [$status, $msg, undef, {
# 'func.outputs' => \%outputs,
# ($which_action eq 'start' ? ('func.has_processes' => [sort keys %has_processes]) : ()),
# 'func.started' => [sort grep {!$terminated{$_}} keys %alive],
# ($which_action eq 'restart' ? ('func.restarted' => [sort grep {$terminated{$_}} keys %alive]) : ()),
# 'func.fail' => [sort keys %fail],
# }];
# }
# $SPEC{start_browsers} = {
App-aep
view release on metacpan or search on metacpan
lib/App/aep.pm view on Meta::CPAN
$debug->( 'STDERR', __LINE__, "Lock order exhausted: starting own command." );
poe->kernel->yield( 'command_start' );
}
else
{
# idle - do nothing, just keep the event loop alive
$debug->( 'STDERR', __LINE__, "Lock order exhausted: idling." );
}
return;
}
App-assh
view release on metacpan or search on metacpan
lib/App/assh.pm view on Meta::CPAN
=for Pod::Coverage ports_config_file ssh_config_file
=head1 MOTIVATION
`autossh` is a nifty little ssh-keepalive-connection-holder.
Passing in the ports for the keepalive can be clumsy though: `assh` helps you to avoid that.
=head1 USAGE
assh
assh HOSTNAME
lib/App/assh.pm view on Meta::CPAN
Next, generate a file `~E<sol>.autossh_rc` with the following format:
foo 12345
... with the first entry on the line representing your `Host` in `~E<sol>.sshE<sol>config` and the second item on the line being the port over which to keep the autossh connection alive.
Now you can permanently connect using:
assh foo
... with the connection kept alive across network switches and computer shutdowns.
=head1 ATTRIBUTES
=over
App-bsky
view release on metacpan or search on metacpan
lib/App/bsky.pm view on Meta::CPAN
require Mojo::IOLoop; # Ensure Mojo is available for the event loop
require Archive::CAR::CID;
require Archive::CAR;
require Codec::CBOR;
# Keep the loop alive even if the connection drops briefly
my $keepalive = Mojo::IOLoop->recurring( 60 => sub { $self->say("[DEBUG] Firehose loop keepalive...") if $ENV{DEBUG}; } );
my %profile_cache;
my @profile_lru;
my $MAX_CACHE = 1000;
my $cache_profile = sub ($p) {
my $did = $p->{did};
lib/App/bsky.pm view on Meta::CPAN
$self->say('[DEBUG] Attempting to reconnect in 5 seconds...') if $ENV{DEBUG} || 1;
Mojo::IOLoop->timer( 5 => sub { $start_stream->() } );
}
else {
$self->say('[DEBUG] Fatal firehose error. Exiting.') if $ENV{DEBUG} || 1;
Mojo::IOLoop->remove($keepalive);
Mojo::IOLoop->stop;
}
return;
}
if ($json) {
( run in 3.235 seconds using v1.01-cache-2.11-cpan-df04353d9ac )