Help for this page

Select Code to Download


  1. or download this
    use Modern::Perl;

<DATA>;
...
PID  POLS U(%) POOL_NAME              Seq#  Num LDEV#  H(%) VCAP(%) TY
+PE PM
003  POLN   0  Bad name with spaces   13453   2 61443  80   -       OP
+EN N
002  POLN  52  DemoSolutions   54068  7 61454  80   -  OPEN N
  2. or download this
    003;POLN;0;Bad name with spaces;13453;2;61443;80;-;OPEN;N
002;POLN;52;DemoSolutions;54068;7;61454;80;-;OPEN;N