-
Notifications
You must be signed in to change notification settings - Fork 0
/
claims
executable file
·95 lines (93 loc) · 1.35 KB
/
claims
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
#!/usr/bin/env perl
my @claims = qw(
827299719600
827187971100
827369754700
827143486700
827164825800
827052502600
827178558500
827135193700
827192878700
827002644500
827178546800
827001168300
826938159400
826772687900
826811913300
826583780600
826695218200
826510537500
826510537600
826510524100
826491753800
826695203500
826195606600
826160394400
826280583800
826160783700
826094295200
825990168700
826003722200
825903010500
825910776700
825746388900
825592388500
825341229400
825497221700
825202745200
825221742300
825038802100
825103644500
825103769400
825103648000
825103335600
825028761000
825166919300
824923183300
824759439500
824634497300
824599120200
824759671300
825269926800
825269939100
825278783500
824684599500
824684609300
824684620000
824519189200
824519201000
824544872900
824554528300
824350034600
825009896200
825009913300
824313206200
824260182900
824387949100
824260214100
824069409800
823982356700
823830755000
823714902900
823390471100
823625617700
823625604700
823434762100
823450812400
823265167800
823265167801
823434749400
823265155900
823265155901
823625592100
823202383800
823591314200
823064433500
823064375400
823591355000
);
foreach(@claims){
# print "$_\n";
system("open https://www.premera.com/Portals/Member/alaska/Report/DisplayEOB/$_?download=True");
}