flow/treasuredb
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Drop unused variables in pseudonymizr.pl

Browse Source
This commit is contained in:
Florian "flowdy" Heß 2016-09-03 15:40:35 +02:00
parent 15f9ed2a98
commit 440453e4e6
1 changed files with 1 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
pseudonymizr.pl
View File

@ -64,12 +64,7 @@ open $registry_fh, '<:utf8', $registry_file
if ( $registry_fh ) { if ( $registry_fh ) {
my ($orig, $random); my ($h1, $h2) = $reverse_mode ? (\%subst => \%known) : (\%known => \%subst);
my ($h1, $h2, $assign) = $reverse_mode
? (\%subst => \%known)
: (\%known => \%subst)
;
while ( $_ = <$registry_fh> ) { while ( $_ = <$registry_fh> ) {
chomp; chomp;
my ($random, $orig) = split /\t/; my ($random, $orig) = split /\t/;