The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
SAXJAZMAN / RT-CIFMinimal-0.01 / html / Callbacks / CIFMinimal / Elements / ShowCustomFields / ShowComponentName 
<%INIT>
if($CustomField->Name() eq 'Restriction'){
    $$Name = '/CIFMinimal/Elements/ShowCustomFieldRestriction';
}
</%INIT>

<%ARGS>
$Name
$CustomField => undef
$Object      => undef
</%ARGS>