#!perl -w
use Mac::Glue;

my($n, @browsers);

@browsers = qw(Safari OmniWeb Firefox Camino Mozilla);

for my $browser (@browsers) {
	my $n = eval {
		new Mac::Glue $browser
	};
	next unless $n;
	
	$n->activate;
	$n->open_location('http://projects.pudge.net/');
}