Rename a file : rename « File « Perl

Home
Perl
1.Array
2.CGI
3.Class
4.Data Type
5.Database
6.File
7.GUI
8.Hash
9.Language Basics
10.Network
11.Regular Expression
12.Report
13.Statement
14.String
15.Subroutine
16.System Functions
17.Win32
18.XML
Perl » File » rename 
Rename a file
   

#!/usr/bin/perl -w

use strict;

print "enter new file name: ";
chomp(my $newname = <STDIN>);
rename "../yourData.dat", $newname or die "rename failed: $!\n";
print "file moved successfully!\n";

   
    
    
  
Related examples in the same category
1.Rename a group of files with a common extension?
2.Renaming Files: rename(OLDFILENAME, NEWFILENAME);
3.Renaming a file before accidental deletion
java2s.com  | Contact Us | Privacy Policy
Copyright 2009 - 12 Demo Source and Support. All rights reserved.
All other trademarks are property of their respective owners.