From 5803d7706a54497d909980ba037392ed49d8bfe1 Mon Sep 17 00:00:00 2001 From: michael Date: Sun, 21 May 2006 23:07:19 +0000 Subject: [PATCH] specifically filter out comments --- snom.pl | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/snom.pl b/snom.pl index b34ab64..8062aaf 100755 --- a/snom.pl +++ b/snom.pl @@ -1,5 +1,5 @@ #!/bin/sh -#$Id: snom.pl,v 1.21 2006-05-21 23:06:48 michael Exp $ +#$Id: snom.pl,v 1.22 2006-05-21 23:07:19 michael Exp $ PATH=/opt/csw/bin:/opt/local/bin:/usr/bin:/bin exec perl -w -x "$0" "$@" @@ -22,6 +22,9 @@ my %Config = (); my @sections = (); while() { chomp; + + next if (m/^#/); + if (m/^\s*\[(.*)\]\s*$/) { push @sections, $1; next; -- 2.39.5