I have a string like a/b/c/d/e/f/godhow do i strip off last word "god" so the o/p is a/b/c/d/e/f
-Nimika
A way .... #!/usr/bin/perl
use strict;
use warnings;my $string = 'a/b/c/d/e/f/god';
my @array = split /\//, $string;
pop @array; # get rid of the last array element on right
$string = join('/', @array);
print "$string\n";
Ad Choices