<[EMAIL PROTECTED]> wrote: > > I am brand new to Perl and I am trying to modify a script that > someone else wrote. > > > I have this line where primaryntaccount = something like this > domainname\userid > > Token=primaryntaccount:: %ntaccount% = (\\w+).*$ > > I want to pass a different value for primaryntaccount which I > am getting by the following line. > > where $UPN = [EMAIL PROTECTED] > > @array = split/([EMAIL PROTECTED])/, $UPN; > $UPN2 = @array[0]; > Token=$UPN2:: %ntaccount% = (\\w+).*$; > > Like I said I am totally new to perl and I don't even really > understand how the token line really works. The best I can > ascertain is that it is passing something back up to DRA. > What is DRA? > > What does this bit do is this simply formatting the data or is > it parsing the variable "(\\w+).*$" ? > > Any help is appreciated.
Hi. It would be nice to have a name so that we knew who we were talking to! The stuff you've written above isn't Perl. These lines @array = split/([EMAIL PROTECTED])/, $UPN; $UPN2 = @array[0]; are fine, but Token=primaryntaccount:: %ntaccount% = (\\w+).*$ and Token=$UPN2:: %ntaccount% = (\\w+).*$ look like batch file commands to me. They certainly won't compile under any Perl that I know about. It may help if you show us a little more context. Cheers, Rob -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
