Perl, 45 characters

$_=sprintf'%b',shift;
print reverse==$_?YES:NO

#Perl, 45 characters#

$_=sprintf'%b',shift;
print reverse==$_?YES:NO

$_=sprintf'%b',shift;
print reverse==$_?YES:NO

edited body

Source Link

edited Feb 8, 2011 at 16:09

user475

#Perl, 45 characters"characters#

$_=sprintf'%b',shift;
print reverse==$_?YES:NO

#Perl, 45 characters"

$_=sprintf'%b',shift;
print reverse==$_?YES:NO

#Perl, 45 characters#

$_=sprintf'%b',shift;
print reverse==$_?YES:NO

Source Link

answered Feb 8, 2011 at 15:17

user475

#Perl, 45 characters"

$_=sprintf'%b',shift;
print reverse==$_?YES:NO

Return to Answer