In my perl script, I have a string variable which has '' in it. I have to replace it with a proper date like '20150101'. I tried the below but it expects the variable as file. Can you please point out what's wrong here?
#!/usr/bin/perl
my $name="FILE_NAME_<DATE>.txt";
my $findDT="<DATE>";
my $dt="20150101";
my $realFileName=~`sed "s/$findDT/$dt/g" $name `;
print $name;
print $realFileName;
You don't need sed, which works on the content of a file. You can do this:
#!/usr/bin/perl
use strict;
use warnings;
my $name="FILE_NAME_<DATE>.txt";
my $findDT="<DATE>";
my $dt="20150101";
# First make a copy of your original variable
my $realFileName = $name;
# Then, replace the variable
$realFileName =~ s/$findDT/$dt/;
print "$name\n";
print "$realFileName\n";
As noted in a comment, remember to always use strict; and use warnings;. They cost nothing and help a lot!
I don't know why you are using sed. Change your script to this.
r - perform non-destructive substitution and return the new value
Check here
#!/usr/bin/perl
use strict;
use warnings;
my $name="FILE_NAME_<DATE>.txt";
my $findDT="<DATE>";
my $dt="20150101";
my $changedFileName = $name=~ s/$findDT/$dt/r;
print "Before Change: $name \n";
print "After Change: $changedFileName \n";
use strict; use warnings;on this Wednesday morning.