perl -E 'use strict; foreach (my $RID) { say "okay"; }'

---------------------------------
Output: 'okay'