.\" Automatically generated by Pod::Man 2.28 (Pod::Simple 3.29) .\" .\" Standard preamble: .\" ======================================================================== .de Sp \" Vertical space (when we can't use .PP) .if t .sp .5v .if n .sp .. .de Vb \" Begin verbatim text .ft CW .nf .ne \\$1 .. .de Ve \" End verbatim text .ft R .fi .. .\" Set up some character translations and predefined strings. \*(-- will .\" give an unbreakable dash, \*(PI will give pi, \*(L" will give a left .\" double quote, and \*(R" will give a right double quote. \*(C+ will .\" give a nicer C++. Capital omega is used to do unbreakable dashes and .\" therefore won't be available. \*(C` and \*(C' expand to `' in nroff, .\" nothing in troff, for use with C<>. .tr \(*W- .ds C+ C\v'-.1v'\h'-1p'\s-2+\h'-1p'+\s0\v'.1v'\h'-1p' .ie n \{\ . ds -- \(*W- . ds PI pi . if (\n(.H=4u)&(1m=24u) .ds -- \(*W\h'-12u'\(*W\h'-12u'-\" diablo 10 pitch . if (\n(.H=4u)&(1m=20u) .ds -- \(*W\h'-12u'\(*W\h'-8u'-\" diablo 12 pitch . ds L" "" . ds R" "" . ds C` "" . ds C' "" 'br\} .el\{\ . ds -- \|\(em\| . ds PI \(*p . ds L" `` . ds R" '' . ds C` . ds C' 'br\} .\" .\" Escape single quotes in literal strings from groff's Unicode transform. .ie \n(.g .ds Aq \(aq .el .ds Aq ' .\" .\" If the F register is turned on, we'll generate index entries on stderr for .\" titles (.TH), headers (.SH), subsections (.SS), items (.Ip), and index .\" entries marked with X<> in POD. Of course, you'll have to process the .\" output yourself in some meaningful fashion. .\" .\" Avoid warning from groff about undefined register 'F'. .de IX .. .nr rF 0 .if \n(.g .if rF .nr rF 1 .if (\n(rF:(\n(.g==0)) \{ . if \nF \{ . de IX . tm Index:\\$1\t\\n%\t"\\$2" .. . if !\nF==2 \{ . nr % 0 . nr F 2 . \} . \} .\} .rr rF .\" ======================================================================== .\" .IX Title "WWW::Selenium::Util 3pm" .TH WWW::Selenium::Util 3pm "2015-12-30" "perl v5.22.1" "User Contributed Perl Documentation" .\" For nroff, turn off justification. Always turn off hyphenation; it makes .\" way too many mistakes in technical documents. .if n .ad l .nh .SH "NAME" WWW::Selenium::Util \- Utility code to help test using Selenium .SH "VERSION" .IX Header "VERSION" version 1.36 .SH "SYNOPSIS" .IX Header "SYNOPSIS" WWW::Selenium::Util contains utility functions to help use Selenium in your test scripts: .PP .Vb 2 \& use WWW::Selenium::Util qw/server_is_running/; \& use Test::More; \& \& if (server_is_running) { \& plan tests => 1; \& } \& else { \& plan skip_all => "No selenium server found!"; \& exit 0; \& } \& \& # ... your tests ... .Ve .SH "NAME" WWW::Selenium::Util \- Utility code to help test using Selenium .SH "FUNCTIONS" .IX Header "FUNCTIONS" .ie n .SS "server_is_running( $host, $port )" .el .SS "server_is_running( \f(CW$host\fP, \f(CW$port\fP )" .IX Subsection "server_is_running( $host, $port )" Returns true if a Selenium server is running. The host and port parameters are optional, and default to \f(CW\*(C`localhost:4444\*(C'\fR. .PP Environment vars \f(CW\*(C`SRC_HOST\*(C'\fR and \f(CW\*(C`SRC_PORT\*(C'\fR can also be used to determine the server to check. .SH "AUTHORS" .IX Header "AUTHORS" Written by Luke Closs .SH "LICENSE" .IX Header "LICENSE" Copyright (c) 2007 Luke Closs .PP This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.