#!C:\strawberry\perl\bin\perl.exe

# Program that acts like cat, but precedes each line with its file name

use 5.020;
use warnings;

while (<>) {
    print "$ARGV: $_";
}

Add Workbook Chapter 5, exercise 1
Add Workbook Chapter 5, exercise 1
