Match case : Case « Regular Expression « Perl






Match case

   


#!/usr/bin/perl -w

use strict;

$_ = "Case";

if (/case/) {
    print "found\n";
} else {
    print "not found\n";
}

   
    
    
  








Related examples in the same category