if ($ajuda_de_custo eq 'Fretado') {
print "Suave!"."\n";
}
Pois:
$ajuda_de_custo = "O Fretado é por sua conta"
match
Citando Leonardo Ruoso <leona...@ruoso.com>:
Em Sex, 2012-08-10 às 06:51 -0300, Thiago Glauco escreveu:
> Sim! No caso a FATEC-PG está muito interessada em que a comunidade
> faça eventos por lá, e ainmda rola ajuda de custo.
if ($ajuda_de_custo =~ 'Fretado') {
print "Suave!"."\n";
}
=begin disclaimer
Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
SaoPaulo-pm mailing list: SaoPaulo-pm@pm.org
L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
=end disclaimer
=begin disclaimer
Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
SaoPaulo-pm mailing list: SaoPaulo-pm@pm.org
L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
=end disclaimer