Hi,
I use AIX (ksh) and Linux (bash) servers. I'm trying to do scripts to will run in both ksh and bash, and most of the time it works. But this time I don't get it in bash (I'm more familar in ksh).
The goal of my script if to read a "config file" (like "ini" file), and make various report.... (2 Replies)
Hi All,
I'm working on a large file and need to extract all data between 2 strings. I have seen many good solutions to threads almost like my problem but none that quite fit.
This is all very new to me so any ideas would be really appreciated! (attempted to read sed and awk tutorials but got a... (9 Replies)
Hi All,
I have a file in which i want to print all the lines between 2 defined strings. Ex- I have file with data as follows
STEP1:-
----- has some 20 -30 lines of data
STEP2:-
----- has some 20 -30 lines of data
So i want to print those lines between STEP1 & STEP2. (line including STEP1)... (7 Replies)
I'm trying to understand if it's possible to create a set of variables that are numbered based on another variable (using eval) in a loop, and then call on it before the loop ends.
As an example I've written a script called question (The fist command is to show what is the contents of the... (2 Replies)
Hi all
Sorry for the basic question, but i am writing a shell script to get around a slightly flaky binary that ships with one of our servers. This particular utility randomly generates the correct information and could work first time or may work on the 12th or 100th attempt etc !.... (4 Replies)
hi all! i have a file like this
lea 25 female
dave 18 male
jake 27 male
and i want to have an output file like this
my name is lea. i am 25. female
my name is dave. i am 18. male
my name is jake. i am 27. male
thanks! (2 Replies)
I have the following code and for some reason when I call the program using
/home/tcdata/tatsh/trunk/hstmy/bin/bash/raytrac.bash --cmod=jcdint.cmod
I get
hasArgument =
hasArgument = true
Somehow the array element is returning even though I have not chosen the option.
... (41 Replies)
Discussion started by: kristinu
41 Replies
LEARN ABOUT DEBIAN
test::www::mechanize::cgiapp
Test::WWW::Mechanize::CGIApp(3pm) User Contributed Perl Documentation Test::WWW::Mechanize::CGIApp(3pm)NAME
Test::WWW::Mechanize::CGIApp - Test::WWW::Mechanize for CGI::Application
SYNOPSIS
# We're in a t/*.t test script...
use Test::WWW::Mechanize::CGIApp;
my $mech = Test::WWW::Mechanize::CGIApp->new;
# test a class that uses CGI::Application calling semantics.
# (in this case we'll new up an instance of the app and call
# its ->run() method)
#
$mech->app("My::WebApp");
$mech->get_ok("?rm=my_run_mode&arg1=1&arg2=42");
# test a class that uses CGI::Application::Dispatch
# to locate the run_mode
# (in this case we'll just call the ->dispatch() class method).
#
my $dispatched_mech = Test::WWW::Mechanize::CGIApp->new;
$dispatched_mech->app("My::DispatchApp");
$mech->get_ok("/WebApp/my_run_mode?arg1=1&arg2=42");
# create an anonymous sub that this class will use to
# handle the request.
#
# this could be useful if you need to do something novel
# after creating an instance of your class (e.g. the
# fiddle_with_stuff() below) or maybe you have a unique
# way to get the app to run.
#
my $custom_mech = Test::WWW::Mechanize::CGIApp->new;
$custom_mech->app(
sub {
require "My::WebApp";
my $app = My::WebApp->new();
$app->fiddle_with_stuff();
$app->run();
});
$mech->get_ok("?rm=my_run_mode&arg1=1&arg2=42");
# at this point you can play with all kinds of cool
# Test::WWW::Mechanize testing methods.
is($mech->ct, "text/html");
$mech->title_is("Root", "On the root page");
$mech->content_contains("This is the root page", "Correct content");
$mech->follow_link_ok({text => 'Hello'}, "Click on Hello");
# ... and all other Test::WWW::Mechanize methods
DESCRIPTION
This package makes testing CGIApp based modules fast and easy. It takes advantage of Test::WWW::Mechanize to provide functions for common
web testing scenarios. For example:
$mech->get_ok( $page );
$mech->title_is( "Invoice Status",
"Make sure we're on the invoice page" );
$mech->content_contains( "Andy Lester", "My name somewhere" );
$mech->content_like( qr/(cpan|perl).org/,
"Link to perl.org or CPAN" );
For applications that inherit from CGI::Application it will handle requests by creating a new instance of the class and calling its "run"
method. For applications that use CGI::Application::Dispatch it will call the "dispatch" class method. If neither of these options are
the right thing, you can set a reference to a sub that will be used to handle the request.
This module supports cookies automatically.
Check out Test::WWW::Mechanize for more information about all of the cool things you can test!
CONSTRUCTOR
new
Behaves like, and calls, Test::WWW::Mechanize's "new" method. It optionally uses an "app" parameter (see below), any other parameters get
passed to Test::WWW::Mechanize's constructor. Note that you can either pass the name of the CGI::Application into the constructor using the
"app" parameter or set it later using the "app" method.
use Test::WWW::Mechanize::CGIApp;
my $mech = Test::WWW::Mechanize::CGIApp->new;
# or
my $mech = Test::WWW::Mechanize::CGIApp->new(app => 'TestApp');
METHODS
$mech->app($app_handler)
This method provides a mechanism for informing Test::WWW::Mechanize::CGIApp how it should go about executing your run_mode. If you set it
to the name of a class, then it will load the class and either create an instance and ->run() it (if it's CGI::Application based), invoke
the ->dispatch() method if it's CGI::Application::Dispatch based, or call the supplied anonymous subroutine and let it do all of the heavy
lifting.
SEE ALSO
Related modules which may be of interest: Test::WWW::Mechanize, WWW::Mechanize.
Various implementation tricks came from Test::WWW::Mechanize::Catalyst.
AUTHOR
George Hartzell, "<hartzell@alerce.com>"
based on Test::WWW::Mechanize::Catalyst by Leon Brocard, "<acme@astray.com>".
COPYRIGHT
Copyright (C) 2007, George Hartzell
This module is free software; you can redistribute it or modify it under the same terms as Perl itself.
perl v5.8.8 2008-03-12 Test::WWW::Mechanize::CGIApp(3pm)