my $skalar = 13;
if(grep{$_ == $skalar}(13..52)){
    print "yes\n";
}