|
|
|
google unix.com
|
|||||||
| Forums | Registrer | Forum Regler | Links | Albums | FAQ | Members List | Kalender | Søgning | Dagens Stillinger | Mark Forums Read |
| Shell Programmering og Scripting Post spørgsmål om ksh, CSH, SH, Bash, Perl, PHP, SED, AWK og ANDRE shell scripts og Shell scriptsprog her. |
Mere UNIX og Linux Forum Emner du måske kan finde Helpful
|
||||
| Tråd | Thread Starter | Forum | Svar | Last Post |
| regex spørgsmål | xiamin | Shell Programmering og Scripting | 3 | 03-05-2009 02:53 AM |
| Perl regex hjælpe - matchende parenteser | CVP | Shell Programmering og Scripting | 7 | 02-27-2009 05:38 PM |
| Hvordan kan jeg strimler denne linje ved hjælp perl regex. | ramky79 | Shell Programmering og Scripting | 1 | 03-18-2008 12:10 PM |
| regex spørgsmål | arushunter | Shell Programmering og Scripting | 8 | 01-04-2007 05:49 PM |
| regex spørgsmål | rocketkids | UNIX for dummyer Spørgsmål & svar | 6 | 02-12-2004 05:49 AM |
Powered by 
|
|
|
LinkBack | Thread Tools | Søg denne tråd | Rate Thread | Display Modes |
07-16-2008
|
||||
|
||||
|
Perl regex spørgsmål
Jeg har følgende kode: Code:
#!/usr/bin/perl -w
@files = <*.csv>;
foreach $file (@files) {
open(FH, $file) || die("Error: Cannot open file $file for reading.");
my @dt = ($file =~ /^(\w+).(\d{6})\.csv$/);
while (<FH>) {
print "@dt[0] $_\n";
}
close(FH);
}
Der er redundans i denne kode, som den første kontrol af alle filer, der ender på ". Csv" (linje 3) og derefter analyserer filename (linje 6) søger efter tegn og cifre. Hvordan ændrer jeg linje 3 i et regulært udtryk, således at linje 6 kan fjernes og array @ dt bestemmes der? |
| Bogmærker |
| Tags |
| perl, perl regex, regex |
| Thread Tools | Søg denne tråd |
| Display Modes | Bedøm denne tråd |
|
|
Gevindskårne Mode
