Perl模塊或方法來創建從目錄沒有系統命令的DVD兼容的ISO

是否有任何Perl模塊或模塊的組合來創建DVD兼容的ISO？這將在Linux上運行，我不關心可移植性。我期望做的是從包含VIDEO_TS目錄結構的目錄創建符合DVD的ISO。該解決方案不需要翻錄實際的DVD。Perl模塊或方法來創建從目錄沒有系統命令的DVD兼容的ISO

我目前運行的是：

genisoimage -V 'Name_of_DVD' -dvd-video -o dvd.iso /some_directory

我知道運行外部命令的Perl能力：

system function 
exec function 
backticks (``) operator 
open function

也有CPAN的CPAN模塊Filesys::MakeISO::Driver::Mkisofs它採用genisoimage/mkisofs的。我特別想要的是使用linux/OS命令的解決方案不是。如果沒有這樣的解決方案或解決方案過於複雜，那麼請說明。謝謝。

2011-12-22 squareatom

@downvoter，我沒有看到有什麼特別錯誤的這個問題。正如我發佈的解決方案可能很簡單，但也許有人有其他想法。 – 2011-12-22 17:15:53

@JoelBerger感謝您的反饋。儘管尋找替代品（如果有的話）。 – squareatom 2011-12-22 18:27:59

雖然我分擔CPAN的熱情，我覺得如果沒有什麼明顯的作品，你不從Linux在意便攜性了，那麼我只想做

use strict; 
use warnings; 

use autodie; 

... 

system(q# genisoimage -V 'Name_of_DVD' -dvd-video -o dvd.iso /some_directory #);

或如你所說，使用Filesys::MakeISO::Driver::Mkisofs。沒有試圖變得sn，不馴，但CPAN應該是生產力++，但如果它不存在，那麼做一下工作。

2011-12-22 17:05:56

希望我能+5這個答案。 Perl使得使用正確的工具很容易，即使該工具不是Perl。 – mob 2011-12-22 17:21:23

@mob注意。試圖找出Perl是否並非正確的工具。 – squareatom 2011-12-22 18:30:22

回答