#!/usr/bin/perl

sub maybeset {
	local($key, $value) = @_;
	$foo{$key} = $value unless defined $foo{$key};
}
