#ex_07-1d
#Learning Perl Appendix A, Exercise 7.1d
/[\000-\377]{5}/