Perl 正则式应用

#! /usr/bin/perl$_ = "yabba dabba doo";if (/abba\ / ) {    print "It matched $_!\n";}