# man beachte das "!"
if( $string !~ /Peter/ ){ 
    print "Peter nicht enthalten";
}