• integer.msn

    682 683  
    8 8 return undef unless ref $SETS;
    9 9 return undef unless $name;
    10 10
    11 for ( $SETS->{$name} ) {
    12 s/^\s+//;
    13 s/\s+$//;
    14 }
    11 15 return undef if $SETS->{$name} eq '';
    12 16 return undef if $SETS->{$name} =~ /\D/;
    13 17 return $SETS->{$name};