diff options
| author | Nicolas Vigier <boklm@mageia.org> | 2011-05-01 21:49:28 +0000 |
|---|---|---|
| committer | Nicolas Vigier <boklm@mageia.org> | 2011-05-01 21:49:28 +0000 |
| commit | d311e59a4169cdef81c9ebda0a6a6d67f6683ea2 (patch) | |
| tree | b40bf07ed1da12fd5e47bc9613261bbcba31d5aa /mgaiso-checkmd5 | |
| parent | f8362971df775aa44f26435dc24e655d79424375 (diff) | |
| download | mgatools-d311e59a4169cdef81c9ebda0a6a6d67f6683ea2.tar mgatools-d311e59a4169cdef81c9ebda0a6a6d67f6683ea2.tar.gz mgatools-d311e59a4169cdef81c9ebda0a6a6d67f6683ea2.tar.bz2 mgatools-d311e59a4169cdef81c9ebda0a6a6d67f6683ea2.tar.xz mgatools-d311e59a4169cdef81c9ebda0a6a6d67f6683ea2.zip | |
add mgaiso-addmd5 and mgaiso-checkmd5 scripts
Diffstat (limited to 'mgaiso-checkmd5')
| -rwxr-xr-x | mgaiso-checkmd5 | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/mgaiso-checkmd5 b/mgaiso-checkmd5 new file mode 100755 index 0000000..6734f12 --- /dev/null +++ b/mgaiso-checkmd5 @@ -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, 0, 1); +print $err; |