yes but the problem is my start point and end point have identical entries
under them. It is stopping at original1.1 when I need for it to stop at
the end of original1.1 and print
media: sf
Volumes:
STK000
Total space available: 60.8G
as opposed to just allsets to original1.1
For example, stops at original1.1
for (<ARC>) {
print if /allsets/ .. /original1\.1/;
}
and in the data file:
Archive sets:
allsets
back.1
media: sf
Volumes:
STK000
Total space available: 60.8G
back.2
media: sf
Volumes:
STK005
Total space available: 60.9G
clinical1.1
media: sf
Volumes:
STK000
Total space available: 60.8G
darch.1
media: sf
Volumes:
STK000
Total space available: 60.8G
fs_clinical.1
Destination: disk1 (/darchive/data1)
fs_clinical.2
sort:path
media: sg
Volumes:
F01133
F01134
F01135
F01136
F01137
F01138
F01139
F01140
Total space available: 151.6G
fs_clinical.3
sort:path
media: sf
Volumes:
F02029
F02030
F02031
F02032
F02033
F02034
F02035
F02036
F02012
Total space available: 796.1G
fs_heartlab.1
sort:path
media: sg
Volumes:
H01134
H01135
H01136
H01137
H01138
H01139
H01140
H01141
H01142
H01143
H01144
H01145
H01146
H01147
H01148
Total space available: 308.7G
fs_heartlab.2
sort:path
media: sf
Volumes:
H02042
H02035
H02036
H02037
H02038
H02039
H02040
H02041
Total space available: 641.2G
fs_lanv1.1
Destination: disk2 (/darchive/data2)
fs_lanv1.2
sort:path
media: sg
Volumes:
L01000
L01001
L01002
L01003
Total space available: 92.7G
fs_lanv1.3
sort:path
media: sf
Volumes:
L02001
L02002
Total space available: 377.6G
fs_lanvision.1
Destination: disk3 (/darchive/data3)
fs_lanvision.2
sort:path
media: sg
Volumes:
L01000
L01001
L01002
L01003
Total space available: 92.7G
fs_lanvision.3
sort:path
media: sf
Volumes:
L02001
L02002
Total space available: 377.6G
fs_original.1
Destination: disk0 (/darchive/data)
fs_original.2
sort:path
media: sg
Volumes:
F01133
F01134
F01135
F01136
F01137
F01138
F01139
F01140
Total space available: 151.6G
fs_original.3
sort:path
media: sf
Volumes:
F02029
F02030
F02031
F02032
F02033
F02034
F02035
F02036
F02012
Total space available: 796.1G
heartlab.1
media: sf
Volumes:
STK000
Total space available: 60.8G
lanv.1
media: sf
Volumes:
STK000
Total space available: 60.8G
lanv1.1
media: sf
Volumes:
STK000
Total space available: 60.8G
original1.1 #### Stopping here #####
media: sf
Volumes:
STK000
Total space available: 60.8G
Derek B. Smith
OhioHealth IT
UNIX / TSM / EDM Teams
Dave Gray
<[EMAIL PROTECTED]
om> To
beginners@perl.org
08/02/2005 02:46 cc
PM
Subject
Re: reg exp using \G
Please respond to
Dave Gray
<[EMAIL PROTECTED]
om>
On 8/2/05, [EMAIL PROTECTED] <[EMAIL PROTECTED]> wrote:
> technically you are correct about escaping the dot, but in this
particular
> situation my regexp is working. I will escape the dot.
> my goal again is to print from one sting to another.... from "allsets"
> down. I apologize for the long output if data, but I want to reflect
100%
> accuracy.
>
> Any ideas on a simple for loop with a regexp?
for (<ARC>) {
print if /one string/ .. /another/;
}
You already had that solution, though. What am I missing?
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
