crawler-bin/otp-egyenleg

   1 #!/bin/bash
   2
   3 if [ -z "$2" ]
   4 then
   5         echo "Usage: $0 <Card10> <TeleCode>
   6  Card10    Bankkartya szam utolso 10 szamjegye
   7  TeleCode  Telekod, ami kezdetben a szamlaszam utolso 3 szamjegye" >&2
   8         exit 1
   9 fi
  10
  11 set -e
  12 set -u
  13
  14 cardnum10=$1
  15 telecode=$2
  16 portalId=''
  17
  18 if [ ${#cardnum10} != 10 ]
  19 then
  20         echo "A 10-jegyű bankkátya szám kell." >&2
  21         exit 1
  22 fi
  23 if [ ${#telecode} != 3 ]
  24 then
  25         echo "A 3-jegyű telekód szám kell (ami kezdetben a számlaszám utolsó 3 számjegye)." >&2
  26         exit 1
  27 fi
  28
  29 curl https://www.otpbankdirekt.hu/homebank/do/bankkartyaEgyenlegLekerdezes \
  30  -sS \
  31  -d muvelet=login \
  32  -d azonosito=$cardnum10 \
  33  -d telekod=$telecode \
  34  -d honlapAzonosito=Default.User \
  35  -d lang=hu \
  36  -d cookieid=$portalId |
  37 perl -ne 'if(/(tartoz.+egyenleg|lek.+tt.+bet|devizanem)/i)
  38  {$A=lc substr$1,0,1;
  39  <>=~/<strong>(.+?)</;
  40  $$A=$1;}
  41  END{printf "Egyenleg: %s %s\nLekötés: %s\n",$t,$d,$l}'