while (<DATA>) {
     print $_;
}

__DATA__
blue
red
orange
brown