>perl -demo

Loading DB routines from perl5db.pl version 1.28
Editor support available.

Enter h or `h h' for help, or `perldoc perldebug' for more help.

main::(-e:1):   mo
  DB<1> $sentence = 'sdfsdfsdf foo asdfklj bar ;alkdjdf'

  DB<2> x $sentence
0  'sdfsdfsdf foo asdfklj bar ;alkdjdf'
  DB<3> p "match" if $sentence =~ /foo/ && $sentence =~ /bar/
match