Translate Perl script to an equivalent Bash or Python

I have 3 short scripts written in Perl. These scripts should be translated to Bash or Python script (any of these two options is valid for me). Below you can see an example of Script #1 (contains 18 lines): if ( @ARGV > 1 ) { die "Usage: [login to view URL] [ utt2spk ] > spk2utt"; } while(<>){ @A = split(" ", $_); @A == 2 || die "Invalid line in utt2spk file: $_"; ($u,$s) = @A; if(!$seen_spk{$s}) { $seen_spk{$s} = 1; push @spklist, $s; } push (@{$spk_hash{$s}}, "$u"); } foreach $s (@spklist) { $l = join(' ',@{$spk_hash{$s}}); print "$s $l\n"; } The Script #2 and #3 contain 8 and 50 lines, correspondingly.