regex question

[a]

Hi,
str = c:/dir0/dir1/file.txt
str =~ /c:\/(.*)/
The $1 will equal to dir0/dir1/file.txt
I only want to have dir0 in $1
How should I put my regex?

Thanks

 

[usenet]

str = c:/dir0/dir1/file.txt
str =~ /c:\/(.*)/
I only want to have dir0 in $1

$str =~ m{c:/(.*?)/};

 

[Tad McClellan]

str = c:/dir0/dir1/file.txt
str =~ /c:\/(.*)/

Scalar variables in Perl start with a dollar character.

Statements in Perl are separated with a semicolon.

That is not Perl code.

The $1 will equal to dir0/dir1/file.txt

Only if the pattern match *succeeds*.

If it fails, it will have whatever value it had from a previous
successful match.

You should check to see if the match succeeded before accessing
the dollar-digit variables.

I only want to have dir0 in $1
How should I put my regex?

if ( $str =~ m#c:/([^/]*)# ) {
# use $1 here
}