#!/usr/bin/perl -w
    print ">>>> ";
    sleep 3;
    <>;
    __END__