Question

我在记事本文件中有数据如下：

A   1-6
A   1-7
B   1-8
B   1-9
B   1-10
c   1-11
C   1-12
D   1-13
F   1-14
F   1-15
f   1-16

我希望上面的数据在记事本文件中更新如下：

<strong>A</strong>  1-6
A   1-7
<strong>B</strong>  1-8
B   1-9
B   1-10
<strong>c</strong>  1-11
C   1-12
<strong>D</strong>  1-13
<strong>F</strong>  1-14
F   1-15
f   1-16

这意味着按字母顺序添加<strong>标记或带有第一个字符的任何其他标记。文件中的数据按字母顺序排序（A到Z）。

我想使用RegEx技术在PHP中实现这一点，请帮忙！

感谢。

Answer 1

我会做类似的事情：

$seen = array();
$file = array(
'A   1-6',
'A   1-7',
'B   1-8',
'B   1-9',
'B   1-10',
'c   1-11',
'C   1-12',
'D   1-13',
'F   1-14',
'F   1-15',
'f   1-16'
);
foreach($file as $line) {
    $L = strtoupper(substr($line, 0, 1));
    if (!isset($seen[$L])) {
        $line = preg_replace('!^(.)!', "<strong>$1</strong>", $line);
        $seen[$L] = 1;
    }
    echo $line,"\n";
}

输出：

<strong>A</strong>   1-6
A   1-7
<strong>B</strong>   1-8
B   1-9
B   1-10
<strong>c</strong>   1-11
C   1-12
<strong>D</strong>   1-13
<strong>F</strong>   1-14
F   1-15
f   1-16

Answer 2

您可以在命令行使用awk而不是grep执行此操作：

<强> example.file：

A   1-6
A   1-7
B   1-8
B   1-9
B   1-10
c   1-11
C   1-12
D   1-13
F   1-14
F   1-15
f   1-16

AWK（不区分大小写）：

cat example.file | awk 'BEGIN {last=""} {if (tolower($1) != last) printf "<b>"$1"</b>"; else printf $1; print " "$2;last=tolower($1)}'

<强>输出：

<b>A</b> 1-6
A 1-7
<b>B</b> 1-8
B 1-9
B 1-10
<b>c</b> 1-11
C 1-12
<b>D</b> 1-13
<b>F</b> 1-14
F 1-15
f 1-16

通过微调，您还可以完全避免完全打印冗余的第一列，并汇总第一次出现的所有数据：

cat t | awk 'BEGIN {last=""} {if (tolower($1) != last) print "<b>"$1"</b>"; print $2;last=tolower($1)}'

<强>输出：

<b>A</b>
1-6
1-7
<b>B</b>
1-8
1-9
1-10
<b>c</b>
1-11
1-12
<b>D</b>
1-13
<b>F</b>
1-14
1-15
1-16

如果这是真正的HTML，您可能还应添加<BR>标记。

使用RegEx在PHP中首字母大写？

2 个答案: