Intrah onat Diria .. Fri, 16 Feb 2007 15:08:02 -0800 , "Nishi Bhonsle" wrote "Revera y":
> Thanks. > > How can i achieve that? my $s = 'instance/bit/bitGroup/default/tz/l_cs'; $s =~ /.*\/(.*)$/; print $1; > $mylang = l_cs, in the above example. > I have to get the last directory and assign it to a var such as > > where the last directory stands for os languages. > instance/bit/bitGroup/default/tz/l_cs > I have a string such as > > Hi: --------the following could be unreadable @ 1171669532 ::: conscious , or , | , <1158956691.10492:: , DIFFERENTLY , the , | , nbeing , . , | , THE_ALGONERIC_LIBRARY , 0.834936931321728 , -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/