On Fri, 22 Oct 2004 [EMAIL PROTECTED] wrote: > this is what i tried > > #!/sbcimp/run/pd/perl/5.8.2/bin/perl -w > my $name = basename($FILENAME, > "\Developer\view_local\local_nt\FDAFDSAFDSASDFA\ASDFDAFSASDF\NewProcess_date_22-oct-2004.log"); > $name =~ s/_*.*//s; > print $name; > > does it make sence
You tell us if it makes sense. What happens when you run this? -- Chris Devers -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
