/gist:457450

## gistfile1.perl
@*ARGS = 'README', 'CREDITS';

for lines() {
    @*ARGS.pop if @*ARGS > 1 ;
    .say
}
	@*ARGS = 'README', 'CREDITS';

	for lines() {
	@ARGS.pop if @ARGS > 1 ;
	.say
	}