D:\PerlMonks>hide1

D:\PerlMonks>echo>hideme.txt This is a test.

D:\PerlMonks>dir
 Volume in drive S is SteveData
 Volume Serial Number is 78B4-33A0

 Directory of D:\PerlMonks

07/09/2016  12:38 AM    <DIR>          .
07/09/2016  12:38 AM    <DIR>          ..
07/09/2016  12:38 AM                88 hide1.bat
07/09/2016  12:41 AM               448 hide1.pl
07/09/2016  12:41 AM                17 hideme.txt
               3 File(s)            553 bytes
               2 Dir(s)  29,695,066,112 bytes free

D:\PerlMonks>perl hide1.pl
File is not hidden.  Hiding

D:\PerlMonks>dir
 Volume in drive S is SteveData
 Volume Serial Number is 78B4-33A0

 Directory of D:\PerlMonks

07/09/2016  12:38 AM    <DIR>          .
07/09/2016  12:38 AM    <DIR>          ..
07/09/2016  12:38 AM                88 hide1.bat
07/09/2016  12:41 AM               448 hide1.pl
               2 File(s)            536 bytes
               2 Dir(s)  29,695,066,112 bytes free

D:\PerlMonks>perl hide1.pl
File is hidden.  Unhiding

D:\PerlMonks>dir
 Volume in drive S is SteveData
 Volume Serial Number is 78B4-33A0

 Directory of D:\PerlMonks

07/09/2016  12:38 AM    <DIR>          .
07/09/2016  12:38 AM    <DIR>          ..
07/09/2016  12:38 AM                88 hide1.bat
07/09/2016  12:41 AM               448 hide1.pl
07/09/2016  12:41 AM                17 hideme.txt
               3 File(s)            553 bytes
               2 Dir(s)  29,695,066,112 bytes free

D:\PerlMonks>