finding a spot in a file

[John W. Krahn]

Chad Kellerman wrote:

>
> Hello,

Hello,

> I am opening up a file (actually a my.conf). I only want 2 lines in
> the file. port and datadir
>
> The problem I am running into is that there is a port = 3324 in both
> the [client] section and the [mysqld] section.
>
> I want to open the file and go straight to the [mysqld] section and
> grab the values for port and datadir.
>
> Can anyone point me in the right direction?

You could use a module like
[url]http://search.cpan.org/author/WADG/Config-IniFiles-2.38/IniFiles.pm[/url] or
[url]http://search.cpan.org/author/SHERZODR/Config-Simple-4.55/Simple.pm[/url]

Or something like this may work:

$/ = '[';
my ( $port, $datadir );
while ( <FILE> ) {
if ( /mysqld]/ ) {
$port = $1 if /^port\s*=\s*(\d+)/m;
$datadir = $1 if /^datadir\s*=\s*(.+)/m;
}
}



John
--
use Perl;
program
fulfillment

[Tore Aursand]

On Thu, 09 Oct 2003 21:12:38 -0400, chad kellerman wrote:

> Can anyone point me in the right direction?

Seems like you're trying to read a configuration file. There are modules
to do that work for you. Check out CPAN.


--
Tore Aursand <tore@aursand.no>

[Rob Dixon]

Chad Kellerman wrote:

>
> I am opening up a file (actually a my.conf). I only want 2
> lines in the file. port and datadir
>
> The problem I am running into is that there is a
> port = 3324 in both the [client] section and the [mysqld]
> section.
>
> I want to open the file and go straight to the [mysqld]
> section and grab the values for port and datadir.
>
> Can anyone point me in the right direction?

Hi Chad.

Does something like this help? It relies on both values
actually being present in the section.

Cheers,

Rob


use strict;
use warnings;

open CONF, 'my.conf' or die $!;

$_ = <CONF> until /\Q[mysqld]/;

my $port;
my $datadir;

while (<CONF>) {

chomp;

$port = $_ if /\bport\s*=/;
$datadir = $_ if /\bdatadir\s*=/;

last if $port and $datadir;
}

[Chad Kellerman]

John,

Thanks that was perfect..



Chad


On Fri, 2003-10-10 at 03:11, John W. Krahn wrote:

> Chad Kellerman wrote:

> >
> > Hello,

>
> Hello,
>

> > I am opening up a file (actually a my.conf). I only want 2 lines in
> > the file. port and datadir
> >
> > The problem I am running into is that there is a port = 3324 in both
> > the [client] section and the [mysqld] section.
> >
> > I want to open the file and go straight to the [mysqld] section and
> > grab the values for port and datadir.
> >
> > Can anyone point me in the right direction?

>
> You could use a module like
> [url]http://search.cpan.org/author/WADG/Config-IniFiles-2.38/IniFiles.pm[/url] or
> [url]http://search.cpan.org/author/SHERZODR/Config-Simple-4.55/Simple.pm[/url]
>
> Or something like this may work:
>
> $/ = '[';
> my ( $port, $datadir );
> while ( <FILE> ) {
> if ( /mysqld]/ ) {
> $port = $1 if /^port\s*=\s*(\d+)/m;
> $datadir = $1 if /^datadir\s*=\s*(.+)/m;
> }
> }
>
>
>
> John
> --
> use Perl;
> program
> fulfillment

--
Chad Kellerman
Systems Administration / Network Operations Manager
Alabanza Inc.
10 E Baltimore Street
Baltimore, Md 21202
Phone: 410-234-3305
Email: [email]ckellerman@alabanza.com[/email]