package Foo;
    use strict;
    use fields qw(_foo);
    ...