#!/usr/bin/env perl

MacPerl::SetFileInfo('ttxt', 'TEXT', @ARGV);