Daniel Falkenberg wrote:
> 
> Hey all,

Hello,

> $card_no = "1234567901234567" # 16 digit number
> 
> How would I go about splitting that number into an array?


$ perl -le '$card_no = "1234567901234567";
@array = split //, $card_no;
print "@array";
@array = $card_no =~ /./g;
print "@array";
@array = unpack "a" x length $card_no, $card_no;
print "@array";
'
1 2 3 4 5 6 7 9 0 1 2 3 4 5 6 7
1 2 3 4 5 6 7 9 0 1 2 3 4 5 6 7
1 2 3 4 5 6 7 9 0 1 2 3 4 5 6 7


John
-- 
use Perl;
program
fulfillment

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to