Jim Green wrote: > my $name = "/usr/local/bin/perl"; > (my $basename = $name) =~ s#.*/##; # Oops! >
#!/usr/bin/perl use strict; use warnings; use File::Basename; my $name = "/usr/local/bin/perl"; my $basename = basename( $name ); print "$basename\n"; -- Just my 0.00000002 million dollars worth, Shawn Programming is as much about organization and communication as it is about coding. I like Perl; it's the only language where you can bless your thingy. -- To unsubscribe, e-mail: [email protected] For additional commands, e-mail: [email protected] http://learn.perl.org/
