my $file = shift || 'foo.html';