C:\PERL\bin>perl tie_test
 Fetchsize array of length 47 is now watched
would you like to alter the file (y/n)
y
 Push  Fetchsize File has been altered

C:\PERL\bin>perl tie_test
 Fetchsize array of length 48 is now watched
would you like to alter the file (y/n)
n
File remains the same