如何解决bash组html表中的类似行,后跟空行
我正在尝试使用bash / awk在HTML表中将相似行和换行符分组,但是我无法获得所需的输出。这是我到目前为止尝试过的。
EDIT1:根据要求添加了输入文件。它可以是任何密码文件。这不是实际的任务,但我正在执行的任务大体相似。 EDIT2:以文本格式给出预期的输出
@Rollback(false)
输入文件
#!/usr/bin/env bash
{
echo "Username,UserID,GroupID,Home Directory,Shell"
while IFS=":" read -r userName encPass userId groupId userComment homeDir userShell; do
echo "${userName},${userId},${groupId},${homeDir},${userShell}"
done < <(sort -t: -k7 /etc/passwd)
} | \
awk -F',' 'BEGIN {
split("80,80,150,",widths,")
print "<style>\
.my_table {font-size:8.0pt; font-family:\"Verdana\",\"sans-serif\"; border-bottom:3px double black; border-collapse: collapse; }\n\
.my_table tr.header{border-bottom:3px double black; center; border: 1px solid black; }\n\
.my_table td {text-align: center; border: 1px solid black; word-break: break-all; padding: 8px 8px; white-space: nowrap; }\n\
.my_table th {text-align: center; solid-black; border: 1px solid black; word-wrap: break-word; color: blue; white-space: nowrap; }\
</style>"
print "<table class=\"my_table\">"
}
NR == 1{
print "<tr class=\"header\">"
tag = "th"
}
NR != 1{
print "<tr>"
tag = "td"
}
{
for(i=1; i<=NF; ++i) print "<" tag " width=\"" widths[i] "\">" $i "</" tag ">"
print "</tr>"
}
END { print "</table>"}' >> passwd.html
文本格式的预期输出
值由实际选项卡分隔。这是通过root:x:0:0:root:/root:/bin/bash
bin:x:1:1:bin:/bin:/sbin/nologin
daemon:x:2:2:daemon:/sbin:/sbin/nologin
adm:x:3:4:adm:/var/adm:/sbin/nologin
lp:x:4:7:lp:/var/spool/lpd:/sbin/nologin
sync:x:5:0:sync:/sbin:/bin/sync
shutdown:x:6:0:shutdown:/sbin:/sbin/shutdown
halt:x:7:0:halt:/sbin:/sbin/halt
mail:x:8:12:mail:/var/spool/mail:/sbin/nologin
operator:x:11:0:operator:/root:/sbin/nologin
games:x:12:100:games:/usr/games:/sbin/nologin
ftp:x:14:50:FTP User:/var/ftp:/sbin/nologin
nobody:x:99:99:Nobody:/:/sbin/nologin
dbus:x:81:81:System message bus:/:/sbin/nologin
rpc:x:32:32:Rpcbind Daemon:/var/lib/rpcbind:/sbin/nologin
sshd:x:74:74:Privilege-separated SSH:/var/empty/sshd:/sbin/nologin
chrony:x:997:995::/var/lib/chrony:/sbin/nologin
tss:x:59:59:Account used by the trousers package to sandbox the tcsd daemon:/dev/null:/sbin/nologin
nginx:x:995:991:Nginx web server:/var/lib/nginx:/sbin/nologin
user1:x:1002:1003::/home/user1:/bin/bash
user2:x:1002:1003::/home/user2:/bin/bash
saslauth:x:993:76:Saslauthd user:/run/saslauthd:/sbin/nologin
mailnull:x:47:47::/var/spool/mqueue:/sbin/nologin
smmsp:x:51:51::/var/spool/mqueue:/sbin/nologin
column -ts $'\t'
电流输出
所需的输出
解决方法
这对您有用吗?
我正在使用perl而不是awk。 Perl随每个Linux发行版一起提供。
#! /bin/bash
cat <<"HTMLEND"
<style>
.my_table {font-size:8.0pt; font-family:"Verdana","sans-serif"; border-bottom:3px double black; border-collapse: collapse;}
.my_table tr.header{border-bottom:3px double black; center; border: 1px solid black;}
.my_table td {text-align: center; border: 1px solid black; word-break: break-all; padding: 8px 8px; white-space: nowrap;}
.my_table th {text-align: center; solid-black; border: 1px solid black; word-wrap: break-word; color: blue; white-space: nowrap;}
</style>
<table class="my_table">
<tr class="header">
<th>Username</th>
<th>UserId</th>
<th>GroupID</th>
<th>Home Directory</th>
<th>Shell</th>
<th>Count</th>
</tr>
HTMLEND
cat pass.txt | perl -e '
my %data = ();
while (<>) {
chomp;
my @cols = split /:/;
my $shell = $cols[6];
$data{$shell}{data} //= [];
push @{$data{$shell}{data}},\@cols;
$data{$shell}{shell} = $shell;
$data{$shell}{count}++;
}
foreach my $shell ( sort keys %data ) {
my $data = $data{$shell}{data};
my $count = $data{$shell}{count};
my $first = 1;
foreach my $col ( @{$data} ) {
print "<tr>\n";
printf " <td>%s</td>\n",$col->[0];
printf " <td>%s</td>\n",$col->[2];
printf " <td>%s</td>\n",$col->[3];
printf " <td>%s</td>\n",$col->[5];
printf " <td>%s</td>\n",$col->[6];
if ($first) {
printf " <td rowspan=\"%s\">%s</td>\n",$count,$count;
}
print "</tr>\n";
$first = 0;
}
}
'
echo '</table>'
,
您可以走XHTML路线,这意味着一旦XML解析器可以读取您的数据,您将拥有很多功能强大的工具来操作数据。
您的html结果已经没有XHTML了,所以我建议一个使用 xmlstarlet 转换列表的解决方案:
(作为最后一步)如果您通过以下bash脚本通过管道传输HTML结果:
#!/usr/bin/env bash
xargs -0 -I{} echo "<xhtml>{}</xhtml>" \
| xmlstarlet sel --indent -t \
--elem xhtml \
--copy-of //style \
--match //table --elem table --copy-of @* \
--match //tr[child::th] --elem tr --copy-of th --elem th -v "'Count'" --break \
--match //tr[child::td] --elem tr --copy-of td --if "not(preceding-sibling::tr[td[5]=current()/td[5]])" \
--var "cnt=count(following-sibling::tr[td[5]=current()/td[5]]) +1" --elem td --attr rowspan --value-of '$cnt' --break --value-of '$cnt'
...然后您将以所需的HTML输出格式设置列表的格式(每组后各行之间的分隔行-我将其留为游乐场,以便您进一步根据自己的喜好来改善结果)。
,如果我正确理解了您的问题,并且不想接触您编写的先前代码,那么只需创建一个新的带有计数的列并将其粘贴到表中即可。
awk '{if(NR > 1){print $NF} }' your_current_output_file >yourlastcolumn
uniq -c yourlastcolumn | awk '{ print $2,$1 }' >counts
cat <(echo "Count") <(join yourlastcolumn counts) >newcolumn
paste your_current_output_file newcolumn >newoutput
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。