Perl 中的一个简单地址簿应用程序

• 下载源代码文件 - 7.2 KB

引言

使用 Perl 的面向对象编程 (OOP) 功能实现一个通讯录。它提供了搜索、排序、格式化打印、数组操作和 I/O 等功能。

背景

这个项目受到了 CodeProject 网站上的一篇文章的启发

• Perl 面向对象编程 by Khurt Williams

Using the Code

有两个依赖文件

• Entry.pm - 这是定义 Entry 对象的地方。
• addressbook.txt - 一个扁平文件的数据库。我原本打算实现 XML，但没有时间了。

Perl OOP

要使用 Entry 构造函数，请包含 pm 文件，如下所示。这在项目中得到了演示。这个项目并没有完全遵循 OOP 设计。我只有很短的时间来实现这个项目，但最终结果绝对很有趣。我希望它能帮助初学者 Perl 程序员了解 Perl 强大的正则表达式功能以及如何在设计中集成 OOP。再次强调，如果您想学习 Perl 中的 OOP，我建议您首先访问 Khurt Williams 的文章页面。

package Entry;

示例格式化排序结果

First Name: Arthur                   Last Name: Putie Home 
Phone: 923-835-8745                  Mobile Phone:923-812-6789 
Address: 23 Wimp Lane, Kensington    Zip code: 38758 
DOB: 8/31/69                         Salary: 126000.00 

First Name: Popeye                   Last Name: Sailor 
Home Phone: 156-454-3322             Mobile Phone: 156-445-4564 
Address: 945 Bluto Street, Anywhe Zip code: 29358 
DOB: 3/19/35                         Salary: 22350.00 

First Name: Michael                  Last Name: Vasquez 
Home Phone: 555-555-5555             Mobile Phone: 562-554-4545 
Address: 1 Perl ave Pomona Ca        Zip code: 90340 
DOB: 12/1/1976                       Salary: 100000.00

Perl 很棒

我学习 Perl 最喜欢的一点是，我可以快速创建一些有意义的代码。此外，我发现 Perl 可以进行重用开发，并且仍然可以快速实现。

许可证

本文未附加明确的许可证，但可能在文章文本或下载文件本身中包含使用条款。如有疑问，请通过下面的讨论区联系作者。

作者可能使用的许可证列表可以在此处找到。