in reply to Re: Not enough arguments script with my perl cgi script?
in thread Failed to display my expected output from my code using perl cgi?

Edited my code.But seems to be problem .

Original content restored below by [GrandFather.

EDITED MY CODE BY THOSE DOCUMENTATION WHICH YOU HAVE PROVIDED ME.WHICH MISTAKE BY ME HAD BRING ME WRONG OUTPUT FROM THE ABOVE CODE
  • Comment on Re^2: Not enough arguments script with my perl cgi script?

Replies are listed 'Best First'.
Re^3: Not enough arguments script with my perl cgi script?
by poj (Abbot) on May 08, 2017 at 10:03 UTC

    Use a capture () to extract the part you want

    #!/usr/bin/local/perl use strict; use Data::Dump 'pp'; my @project_name = (); while (my $line = <DATA>){ if ( $line =~ m!\[(.*):/\]! ){ push @project_name,$1; } } pp \@project_name; __DATA__ cpfskTeam = sonkar, mobrien3, dokeeff2, pquinla, hkumar3 [cpfsk:/] * = r @cpfskTeam = rw @serveradmins = rw @svnadmin = rw
    poj
Re^3: Not enough arguments script with my perl cgi script?
by Anonymous Monk on May 08, 2017 at 08:25 UTC
    you can't guess at the syntax you're supposed to use, the good news is you dont have to guess, copy/paste from the documentation