thanks again Mr.bean! I think I need a Perl 101 Tutorial
hope you could help me again in the future.
God bless!
rymnd_1234
---------- Post updated at 08:05 AM ---------- Previous update was at 03:04 AM ----------
Mr.bean,
I can now somehow understand the code, however I'm thinking this since a while ago:
if(/MOBILITY EVENT \(([A-Z])\)/) {
$c++;
$r{$c}{'Event'} = $1; #how did the code know that $1 = letter of mobility event
next;
}
if(/^\s*(.*?)\s*:\s*(.*)\s*$/) {
$r{$c}{$1} = $2; #same here, how did the system know that $1 = key and $2 = value, I mean how can the code interpret that value $1 = letter of the Mobility event?
Pls advise... thanks,
rymnd
---------- Post updated at 08:05 AM ---------- Previous update was at 08:05 AM ----------
Mr.bean,
I can now somehow understand the code, however I'm thinking this since a while ago:
if(/MOBILITY EVENT \(([A-Z])\)/) {
$c++;
$r{$c}{'Event'} = $1; #how did the code know that $1 = letter of mobility event
next;
}
if(/^\s*(.*?)\s*:\s*(.*)\s*$/) {
$r{$c}{$1} = $2; #same here, how did the system know that $1 = key and $2 = value, I mean how can the code interpret that value $1 = letter of the Mobility event?
Pls advise... thanks,
rymnd