From d311e59a4169cdef81c9ebda0a6a6d67f6683ea2 Mon Sep 17 00:00:00 2001 From: Nicolas Vigier Date: Sun, 1 May 2011 21:49:28 +0000 Subject: add mgaiso-addmd5 and mgaiso-checkmd5 scripts --- mgaiso-addmd5 | 10 ++++++++++ 1 file changed, 10 insertions(+) create mode 100755 mgaiso-addmd5 (limited to 'mgaiso-addmd5') diff --git a/mgaiso-addmd5 b/mgaiso-addmd5 new file mode 100755 index 0000000..2bb1a96 --- /dev/null +++ b/mgaiso-addmd5 @@ -0,0 +1,10 @@ +#!/usr/bin/perl + +use strict; +use MGATools::iso qw(include_md5); + +@ARGV || exit(1); + +my $isofile = $ARGV[0]; +my $err = include_md5($isofile, 1, 1); +print $err; -- cgit v1.2.1