my $number = "2301";
my @output = `./retrive $number`;
chomp @output; # remove line endings