perl -e "use re 'debug'; print 'this is a demo' =~ /\w+/;"