列印

Please login or register.
一小時 一天 一週 一個月 永遠
請輸入帳號, 密碼以及預計登入時間

[admin]

The basic method for applying a regular expression is to use the pattern binding operators =~ and !~. The first operator is a test and assignment operator.

Match Regular Expression - m//

程式碼: [Select]

$bar = "This is foo and again foo";
if ($bar =~ /foo/){
   print "First time is matching\n";
}else{
   print "First time is not matching\n";
}

[admin]

Regular Expression Variables
Regular expression variables include $, which contains whatever the last grouping match matched; $&, which contains the entire matched string; $`, which contains everything before the matched string; and $', which contains everything after the matched string.

程式碼: [Select]

$string = "The food is in the salad bar";
$string =~ m/foo/;
print "Before: $`\n";
print "Matched: $&\n";
print "After: $'\n";

[admin]

The Substitution Operator
s/PATTERN/REPLACEMENT/;

程式碼: [Select]

$string = "The cat sat on the mat";
$string =~ s/cat/dog/;

print "$string\n";

[admin]

Matching variables

程式碼: [Select]

$time = "12:05:30";

$time =~ m/(\d+):(\d+):(\d+)/;
my ($hours, $minutes, $seconds) = ($1, $2, $3);

print "Hours : $hours, Minutes: $minutes, Second: $seconds\n";

[admin]

Rename

程式碼: [Select]

rename -v   's/(D\d\d\d)\S+(_R[12])\S+\.fastq$/$1$2\.fastq/' *.fastq