Let's decode it using perl
perl -MO=Deparse perl_is_simple.pl