-Michael#!/usr/bin/perl use strict; use warnings; my $filename = "rahul.abc"; chomp $filename; my @filename = split ('\.', $filename); $filename[$#filename] = 'newEnding.txt'; my $newFilename = join('.', @filename); print STDERR "OLD: $filename\tNEW: $newFilename\n";
In reply to Re: appending file name
by mtmcc
in thread appending file name
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |