while (scalar(@ra)) 
{
while (scalar(@rb))
{
while (scalar(@rc)) 
{
# rest
}
}
}
[download]

but it doesn't make sense anyway