in reply to perl IDE in perl

For simplicity in a Perl text editor its hard to look past this one-line wonder from hiseldl ... :-)

perl -MTk -MTk::TextUndo -e "(tkinit)->Scrolled('TextUndo')->pack;Main +Loop"

 

perl -le 'print+unpack("N",pack("B32","00000000000000000000001000110001"))'