Help for this page

Select Code to Download

Select or download this
```
TEST:foo:bar:123:A:B
```

Select or download this

my ($test, $foo, $bar, $num, $A, $B) = split /:/, $_;
print $foo