$ perl 1093455.pl
> someidentifier, 20
> someidentifier2, 80
$