Question abt Pattern Matching

[maskman0]

Hi im new to perl can some one explain me, what do these patterns look for ?

next if m/^\s*#/;
next if m/^\s*$/;
if (m/^\s*\[\s*(.*)\s*\]/)
next unless m/^\s*([^=\s]+)\s*=\s*(.*)\s*$/;

value =~ s/#.*//;
$value =~ s/^\s*//;
$value =~ s/\s*$//;
$value =~ s/^"//;
$value =~ s/"$//;
$value =~ s/^'//;
$value =~ s/'$//;


thanks

 

[travs69]

http://perldoc.perl.org/perlre.html

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Travis - Those Who Say It Cannot Be Done Are Usually Interrupted by Someone Else Doing It; Give the wrong symptoms, get the wrong solutions;

 

[maskman0]

I read it & tried ..but could not et my answer ....could you please explain 2 -3 of these patterns ...ill try to fiure out rest.

Thanks

 

[travs69]

$value =~ s/^"//;
Means that it starts with "
$value =~ s/"$//;
Means it ends with "


~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Travis - Those Who Say It Cannot Be Done Are Usually Interrupted by Someone Else Doing It; Give the wrong symptoms, get the wrong solutions;