package Custom;

sub empty {
    return '';
}

sub undefined {
    return undef;
}

sub test_uc {
    return uc $_[0];
}

1;