gent;
use Moose;
use Sereal qw(encode_sereal decode_sereal);
use Digest::MD5 qw(md5_hex);
use JSON;
use XML::Simple;
use Cwd;
our $VERSION = '1.0';
has user_agent => (
is => 'ro',
$self->get_response($self->api_url, $ifsc_code);
return $data->{'RTGS'};
}
sub download_json {
my ($self, $ifsc_code, $file_name) = @_;
return if ( !$self->ping_api );
my $req
my $response = $self->user_agent->get($request_url);
$file_name ||= "bankdetails_$ifsc_code.json";
open(my $fh, '>', $file_name) or die $!;
print $fh $response->decoded_content;
c