projects
/
Biblio-RFID.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
821fd03
)
support SID,content arguemnts
author
Dobrica Pavlinusic
<dpavlin@rot13.org>
Wed, 22 Apr 2015 10:33:29 +0000
(12:33 +0200)
committer
Dobrica Pavlinusic
<dpavlin@rot13.org>
Wed, 22 Apr 2015 10:33:29 +0000
(12:33 +0200)
scripts/program.pl
patch
|
blob
|
history
diff --git
a/scripts/program.pl
b/scripts/program.pl
index
b0fc125
..
921153d
100755
(executable)
--- a/
scripts/program.pl
+++ b/
scripts/program.pl
@@
-29,6
+29,10
@@
GetOptions(
) || die $!;
my ( $sid, $content ) = @ARGV;
) || die $!;
my ( $sid, $content ) = @ARGV;
+if ( $sid =~ m/.+,.+/ && ! defined $content ) {
+ ( $sid, $content ) = split(/,/, $sid);
+}
+
die "usage: $0 [--reader regex_filter] [--afi 214] [--type 1] E0_RFID_SID [barcode]\n" unless $sid && ( $content || $afi || $blank );
$hash->{content} = $content if defined $content;
die "usage: $0 [--reader regex_filter] [--afi 214] [--type 1] E0_RFID_SID [barcode]\n" unless $sid && ( $content || $afi || $blank );
$hash->{content} = $content if defined $content;