相关疑难解决方法(0)

如何在Perl中实现调度表?

我需要在Perl中编写一个与存储相关的应用程序.该应用程序需要将文件从本地计算机上载到其他一些存储节点.目前,上传方法是FTP,但将来它可能是bittorrent或一些未知的超文件传输方法.

对于需要上传的每个文件,都有一个配置文件,用于定义文件名,文件将上传到的存储节点以及上传过程中应使用的传输方法.

当然,我可以使用以下方法来解决我的问题:

{
  if ( $trans_type == "ftp" ) { ###FTP the FILE}
  if ( $trans_type == "bit" ) { ###BIT the FILE}
  ### etc ###
}
Run Code Online (Sandbox Code Playgroud)

但即使我在学校学到了基本的OO知识,我仍然觉得这不是一个好的设计.(问题标题可能有点误导.如果你认为我的问题可以通过非OO解决方案优雅地解决,那对我来说还是可以的.实际上它会更好,因为我的OO知识有限.)

那么你们一般可以给我一些建议吗?当然,如果你提供一些示例代码,这将是一个很大的帮助.

perl dispatch-table

5
推荐指数
3
解决办法
3029
查看次数

标签 统计

dispatch-table ×1

perl ×1