今天看到一个perl面向对象编程的例子,充分体现了如何对数据进行封装: 自己模仿写一个读取配置文件的例子, 配置文件的内容如下 samtools_binary = /usr/bin/samtools 用=分隔,保存了每个软件可执行文件的绝对路径; 下面用perl 模块进行配置文件的读取, 模块名为config.pm package config; use strict; use warnings FATAL => 'all'; sub new { my $self = {}; bless($se…