use strict; 
use warnings;

use constant VALUES => qw(1 2 3 4 5);

foreach (VALUES) {
    print;
}