10 my $password = 'test';
12 getopts('d:U:', \%opt);
13 die usage() unless $opt{d};
14 my $test = FS::Test->new( dir => $opt{d} );
15 $test->fsurl($opt{U}) if $opt{U};
17 my $testfile = $test->share_dir . '/ui_tests';
18 open my $fh, '<', $testfile
19 or die "Couldn't read tests from '$testfile': $!\n";
20 $test->fetch( <$fh> );
23 "Usage: $0 -d directory [ -U base_URI ]\n\n";
28 freeside-test-fetch - download a list of UI pages for testing
32 freeside-test-fetch -d /tmp/outputdir [ -U http://myserver/freeside ]
36 -d: the directory to put the files in. Required.
38 -U: the URL prefix for the Freeside server. Defaults to
39 "http://localhost/freeside".
41 The list of tests is in the 'ui_tests' file included with FS::Test.