use Net::Stripe;
	my $stripe = Net::Stripe->new(
		api_key => $CFG->{stripe_mode} eq "test" ? $CFG->{stripe_secret_test} : $CFG->{stripe_secret_live},
		debug         => '1',
    	debug_network => '1'
     );

     my $cards = $stripe->get_cards(customer => 'cus_ALXYaoa9Lpo4Gs', limit => 10);