Man page slightly wrong. It's missing some punctuation.

[davehodg]

It should be:

#!/usr/bin/env perl

use strict;
use warnings;

use HTML::Mason::Tests;

my $group = HTML::Mason::Tests->new( name => 'name of group', description => 'tests something' );
$group->add_test( name => 'foo',
description => 'tests foo',
comp_root =>
'/home/daveh/Perforce/code_SaaS/head/portal/WWWDocs/portal/cloud_dashboard/',
component => <<'EOF'
<%args>
$foo => 1
</%args>
<% $foo %>
EOF,
expect => <<'EOF',
1
EOF
);

Also, I think it's well worthwhile mentioning that expect can be a regexp. I only found that by trawling the source code.