]>
iEval git - webservice-foaas.git/blob - t/WebService-FOAAS.t
6 use Test
::RequiresInternet
'foaas.com' => 443;
7 use Test
::More tests
=> 3;
8 BEGIN { use_ok
('WebService::FOAAS') };
12 $res = foaas_cool
'MGV';
13 is
$res, 'Cool story, bro. - MGV', 'cool';
15 $res = foaas_dosomething
'Do', 'thing', 'MGV', {shoutcloud
=> 1};
16 is
$res, 'DO THE FUCKING THING! - MGV', 'dosomething + shoutcloud';
This page took 0.042974 seconds and 4 git commands to generate.