I just write a simple function to read the file line by line.
But when I run it it says out of memory.
I am not sure about the root cause, Can someone help me out of this?
I want to append a decimal number to a string. But I want to restrict the number to only 2 decimal points
for e.g:
my $output = "\n The number is = ";
my $number = 2.3333333;
$output = $output . $number;
But I want the $output as: "The number is = 2.33"; and not 2.3333333
(I do not... (1 Reply)
Hey,
I'm trying to read a file from a server. Simple file with some numbers.
Here is the code i'm running.
use Net::SSH::Perl::SSH1 ;
$scon = Net::SSH::Perl->new ("com123.sever.mydomain.com",(protocol=>'2',port=>'22',debug=>'true'));
$scon->login("user123","pass123");
open(FILE,... (9 Replies)
Hi,
I am new to perl.
I want to read from a file on the basis of some conditions..
I want to define parameters in a configuration file in such a manner like...
etc..
in my perl script, theer is a variable like this..
then i want to read values from first if block from the file... (1 Reply)
Hi there, i have been trying different methods and i wonder if somebody could explain to me how i would perform a comparison on two arrays for example
my @array1 = ("gary" ,"peter", "paul");
my @array2 = ("gary" ,"peter", "joe");
I have two arrays above, and i want to something like this... (5 Replies)
I am totally new to perl. I am modifying someone else's script. I have the following output:
# ./some-perlscript
A
B
C
D
E
B - E, is generated through the print command that I put in the script. I want to remove A, it seems it is generated automatically by a custom OS it is querying when... (3 Replies)
If a form's action is the following Perl script how do I make it print the entire contents of the file on the screen?
if(param())
{
my $uploadedFile = param('file');#in the html page 'file' is the value of the name attribute of the input
my $fh = upload($uploadedFile);
... (1 Reply)
Hello, I have a simple(I think) question!
Although simple, I have been unable to resolve it, so I hope someone can help! OK, here it is:
1)I have an awk script that prints something, such as:
awk '{print $2}' a > x
so x might hold the value of say '10'
2)Now, I just want to check to see if... (4 Replies)
Hello,
I'm completely new to Perl and I'm just looking for a quick answer to some code I'm trying to come up with. I'm trying to access a website, part of the URL I want the user to be able to define via standard input. As you can see below I'm still trying to get the syntax.
... (2 Replies)
Is there a script that will automatically access/count the words in each individual file for a program?
(Sorry, I'm trying to help my girlfriend who's in computer science out, I know nothing about this. We're having trouble wording this question.) (1 Reply)
Discussion started by: Triple M
1 Replies
LEARN ABOUT DEBIAN
plack::handler
Plack::Handler(3pm) User Contributed Perl Documentation Plack::Handler(3pm)NAME
Plack::Handler - Connects PSGI applications and Web servers
SYNOPSIS
package Plack::Handler::AwesomeWebServer;
sub new {
my($class, %opt) = @_;
...
return $self;
}
sub run {
my($self, $app) = @_;
# launch the AwesomeWebServer and run $app in the loop
}
# then from command line
plackup -s AwesomeWebServer -a app.psgi
DESCRIPTION
Plack::Handler defines an adapter (connector) interface to adapt plackup and Plack::Runner to various PSGI web servers, such as Apache2 for
mod_perl and Standalone for HTTP::Server::PSGI.
It is an empty class, and as long as they implement the methods defined as an Server adapter interface, they do not need to inherit
Plack::Handler.
If you write a new handler for existing web servers, I recommend you to include the full name of the server module after Plack::Handler
prefix, like Plack::Handler::Net::Server::Coro if you write a handler for Net::Server::Coro. That way you'll be using plackup command line
option like:
plackup -s Net::Server::Coro
that makes it easy to figure out which web server you're going to use.
METHODS
new
$server = FooBarServer->new(%args);
Creates a new adapter object. %args can take arbitrary parameters to configure server environments but common parameters are:
port Port number the server listens to.
host Address the server listens to. Set to undef to listen any interface.
run
$server->run($app);
Starts the server process and when a request comes in, run the PSGI application passed in $app in the loop.
register_service
$server->register_service($app);
Optional interface if your server should run in parallel with other event loop, particularly AnyEvent. This is the same as "run" but
doesn't run the main loop.
SEE ALSO
rackup
perl v5.14.2 2011-02-27 Plack::Handler(3pm)