23、UNIX/Linux 编程：Awk 与 Perl 实战指南

UNIX/Linux 编程：Awk 与 Perl 实战指南

1. Awk 语言基础与实际应用

1.1 铁路公司数据处理问题

假设有一家铁路公司，运营着往返于多个城市之间的列车。该公司提供三种服务类型：本地（local）、快速（fast）和特快（express）。票价计算规则为：本地列车每位乘客每公里 10 便士，快速列车每位乘客每公里 12 便士，特快列车每位乘客每公里 15 便士。公司会记录所有列车行程，每年的数据存于一个文件（如trainlog）中，文件包含以下字段：出发城市、到达城市、行驶距离（公里）、乘客数量、服务类型（本地、快速或特快），最后两个字段是行程发生的日期（日和月）。示例如下：

Edinburgh Glasgow 71 23 local 14 5 Aberdeen London 805 675 express 14 5 Manchester Birmingham 128 534 fast 15 5 Exeter Exmouth 8 112 local 15 5

公司运营列车的成本为每次行程固定 100 英镑，外加每公里 5 英镑。下面是使用 Awk 脚本处理trainlog文件并显示相关信息的需求及思路。

1.1.1 需求分析

• a. 运行的列车数量：统计文件中的行数。
• b. 5 月运行的列车数量：筛选出月份为 5 的记录并计数