for my $s (qw/ gpio_fsel gpio_set /) {
	no strict 'refs';
	*$s = \&{"Device::BCM2835::$s"};
}