TABLE OF CONTENTS

::pwtk::cat

SYNOPSIS

proc ::pwtk::cat {args} {

USAGE

    ::pwtk::cat file1 ?file2? ?...?

DESCRIPTION

Concatenate files and print on the standard output. It's like a Unix cat command but accepts no options.

SOURCE

    foreach f $args {
        fileMustExist $f
        puts [readFile $f]
    }
}