Re: Match multiple number

if ( $Number =~ /\d*[05]/ ) {
[download]

Comment on Re: Match multiple number Download Code

Replies are listed 'Best First'.
Re^2: Match multiple number by choroba (Cardinal) on Aug 18, 2018 at 07:05 UTC
`my $Number = '!56'; if ( $Number =~ /\d[05]/ ) { say "$Number is divisible by 5."; warn 'Really?'; }` [download] A dollar sign missing somewhere at least. ($q=q:Sq=~/;[c](.)(.)/;chr(-\|\|-\|5+lengthSq)`"S\|oS2"`map{chr \|+ord }map{substrSq`S_+\|`\|}3E\|-\|`7*2-3:)=~y+S\|`+$1,++print+eval$q,q,a, [download]	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re^2: Match multiple number
by choroba (Cardinal) on Aug 18, 2018 at 07:05 UTC

my $Number = '!56';
if ( $Number =~ /\d*[05]/ ) {
    say "$Number is divisible by 5.";
    warn 'Really?';
}
[download]

A dollar sign missing somewhere at least.

($q=q:Sq=~/;[c](.)(.)/;chr(-||-|5+lengthSq)`"S|oS2"`map{chr |+ord
}map{substrSq`S_+|`|}3E|-|`7**2-3:)=~y+S|`+$1,++print+eval$q,q,a,
[download]