glob function and getting directory contents

[Abhinav]

Hi,

I have a somewhat trivial problem, on which some input would be highly
appreciated.

I want to get the list of all the files in the current directory, whose
names are in the format

[0-9]+.xml
i.e. all files whose names are of the format <positive integer>.xml

I was hoping to do it with glob(), but I cannot come up with a pattern
which will be able to do this.

In fact, it seems (according to responses to my thread on
comp.os.linux.misc) that this is not possible ?

Would appreciate any pointers on how this could be done.

Regards

 

[Paul Lalli]

Hi,

I have a somewhat trivial problem, on which some input would be highly
appreciated.

I want to get the list of all the files in the current directory, whose
names are in the format

[0-9]+.xml
i.e. all files whose names are of the format <positive integer>.xml

I was hoping to do it with glob(), but I cannot come up with a pattern
which will be able to do this.

In fact, it seems (according to responses to my thread on
comp.os.linux.misc) that this is not possible ?

Why do you want to use glob?

open my $dir, '.' or die "Cannot open current directory: $!";
my @files = grep /^\d+\.xml$/, readdir($dir);


If you really want to use glob, I suppose you could also do:
my @files = grep /^\d+\.xml$/, glob('*');

Paul Lalli

 

[Abhinav]

Hi,

I have a somewhat trivial problem, on which some input would be highly
appreciated.

I want to get the list of all the files in the current directory, whose
names are in the format

[0-9]+.xml
i.e. all files whose names are of the format <positive integer>.xml

I was hoping to do it with glob(), but I cannot come up with a pattern
which will be able to do this.

In fact, it seems (according to responses to my thread on
comp.os.linux.misc) that this is not possible ?

Why do you want to use glob?

Because I thought that this would be the simplest way to do it. But maybe not

open my $dir, '.' or die "Cannot open current directory: $!";
my @files = grep /^\d+\.xml$/, readdir($dir);


If you really want to use glob, I suppose you could also do:
my @files = grep /^\d+\.xml$/, glob('*');

Thanks ! This will do well enough !

Regards

 

[Paul Lalli]

Hi,

I have a somewhat trivial problem, on which some input would be highly
appreciated.

I want to get the list of all the files in the current directory, whose
names are in the format

[0-9]+.xml
i.e. all files whose names are of the format <positive integer>.xml

I was hoping to do it with glob(), but I cannot come up with a pattern
which will be able to do this.

In fact, it seems (according to responses to my thread on
comp.os.linux.misc) that this is not possible ?

Why do you want to use glob?

Because I thought that this would be the simplest way to do it. But maybe not

glob is useful for filename expansion, as the csh shell would do it. That
is, it will expand '~mritty' to /users/mritty or "*.c" to a list of all
files ending in .c. If you have anything more complex than that, I'd
recommend using Perl's RegExps, which are far more powerful.

Thanks ! This will do well enough !

Quite Welcome.

Paul Lalli

 

[Tintin]

Hi,

I have a somewhat trivial problem, on which some input would be highly
appreciated.

I want to get the list of all the files in the current directory, whose
names are in the format

[0-9]+.xml
i.e. all files whose names are of the format <positive integer>.xml

I was hoping to do it with glob(), but I cannot come up with a pattern
which will be able to do this.

In fact, it seems (according to responses to my thread on
comp.os.linux.misc) that this is not possible ?

Why do you want to use glob?

open my $dir, '.' or die "Cannot open current directory: $!";
my @files = grep /^\d+\.xml$/, readdir($dir);


If you really want to use glob, I suppose you could also do:
my @files = grep /^\d+\.xml$/, glob('*');

or a variation on that:

foreach my $file (<*.xml>) {
next unless $file =~ /^\d+\.xml$/;
..
}