• Publicidad

Pequeño problema con return

¿Apenas comienzas con Perl? En este foro podrás encontrar y hacer preguntas básicas de Perl con respuestas aptas a tu nivel.

Pequeño problema con return

Notapor luisbal » 2015-01-22 08:44 @405

Estoy integrando mi sitio con stripe, el código es sencillo y he encontrado el módulo Perl (Business::Stripe).

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1. my $stripe = Business::Stripe->new(
  2.    -api_key => 'c6EiNIusHip8x5hkdIjtur7KNUA3TTpE'
  3. );
  4.  
  5. $stripe->charges_create(
  6.     amount => 400,
  7.     card => 'tok_5EuIyKyCTc0f2V',
  8.     description => 'Ice cream'
  9. ) and return $stripe->success;
  10.  
  11. print $stripe->error->{message}, "\n";
Coloreado en 0.003 segundos, usando GeSHi 1.0.8.4

Les explico: quiero modificar esto, de modo que pueda manejarlo de este modo:
Sintáxis: [ Descargar ] [ Ocultar ]
Using text Syntax Highlighting
IF (SUCCESS){
HAGO ALGO
}
ELSE {
DEVUELVO ERROR
}
Coloreado en 0.000 segundos, usando GeSHi 1.0.8.4


¿Pueden ayudarme, por favor?
Última edición por explorer el 2015-01-22 09:03 @419, editado 1 vez en total
Razón: Marcado Perl; codigo => código; MAYÚSCULAS;
luisbal
Perlero nuevo
Perlero nuevo
 
Mensajes: 20
Registrado: 2008-09-12 09:36 @442

Publicidad

Re: Pequeño problema con return

Notapor explorer » 2015-01-22 09:08 @422

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1. my $stripe = Business::Stripe->new(
  2.    -api_key => 'c6EiNIusHip8x5hkdIjtur7KNUA3TTpE'
  3. );
  4.  
  5. if ($stripe->charges_create(
  6.     amount => 400,
  7.     card => 'tok_5EuIyKyCTc0f2V',
  8.     description => 'Ice cream'
  9. )) {
  10.     ...;    # HACER ALGO
  11. }
  12. else {
  13.     print $stripe->error->{message}, "\n";
  14. }
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14476
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España

Re: Pequeño problema con return

Notapor luisbal » 2015-01-22 09:35 @441

¡Gracias, explorer!
Última edición por explorer el 2015-01-22 11:29 @520, editado 1 vez en total
Razón: Admiraciones;
luisbal
Perlero nuevo
Perlero nuevo
 
Mensajes: 20
Registrado: 2008-09-12 09:36 @442


Volver a Básico

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 2 invitados