-----Original Message----- >From: "Sayed, Irfan (Irfan)" <[EMAIL PROTECTED]> >Sent: Aug 6, 2007 11:03 AM >To: beginners@perl.org >Subject: Error in executing the script > >Hi All, > >I have following script > >#!/usr/atria/bin/Perl >use strict; >use warnings; > > # Subroutine prototypes > join_proj(); > rebase(); > deliver(); > quit(); > > # Define the actions to take > my %action_to_take = ( > '1' => \&join_proj, > '2' => \&rebase, > '3' => \&deliver, > '4' => \&quit, > ); > > # Print the menu selection > print <<"EOT"; > Select one of: > 1. Join the project > 2. Rebase > 3. Deliver > 4: quit > EOT
There is most likely a space/tab follow the second EOT,remove it. -- Jeff Pang <[EMAIL PROTECTED]> http://home.arcor.de/jeffpang/ -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/
