package B;

use strict;

use base qw(A);
use fields qw(addr phone city);