$list = @("michal.boni@europarl.europa.eu",
"jerzy.buzek@europarl.europa.eu",
"andrzej.grzyb@europarl.europa.eu",
"krzysztof.hetman@europarl.europa.eu",
"danuta.huebner@europarl.europa.eu",
"danuta.jazlowiecka@europarl.europa.eu",
"jaroslaw.kalinowski@europarl.europa.eu",
"agnieszka.kozlowska-rajewicz@europarl.europa.eu",
"barbara.kudrycka@europarl.europa.eu",
"janusz.lewandowski@europarl.europa.eu",
"elzbieta.lukacijewska@europarl.europa.eu",
"jan.olbrycht@europarl.europa.eu",
"julia.pitera@europarl.europa.eu",
"marek.plura@europarl.europa.eu",
"dariusz.rosati@europarl.europa.eu",
"czeslaw.siekierski@europarl.europa.eu",
"adam.szejnfeld@europarl.europa.eu",
"jaroslaw.walesa@europarl.europa.eu",
"bogdan.wenta@europarl.europa.eu",
"bogdan.zdrojewski@europarl.europa.eu",
"tadeusz.zwiefka@europarl.europa.eu",
"ryszard.czarnecki@europarl.europa.eu",
"edward.czesak@europarl.europa.eu",
"anna.fotyga@europarl.europa.eu",
"beata.gosiewska@europarl.europa.eu",
"czeslaw.hoc@europarl.europa.eu",
"marek.jurek@europarl.europa.eu",
"karol.karski@europarl.europa.eu",
"slawomir.klosowski@europarl.europa.eu",
"zdzislaw.krasnodebski@europarl.europa.eu",
"urszula.krupa@europarl.europa.eu",
"zbigniew.kuzmiuk@europarl.europa.eu",
"ryszardantoni.legutko@europarl.europa.eu",
"stanislaw.ozog@europarl.europa.eu",
"boleslaw.piecha@europarl.europa.eu",
"miroslaw.piotrowski@europarl.europa.eu",
"tomasz.poreba@europarl.europa.eu",
"jadwiga.wisniewska@europarl.europa.eu",
"kosma.zlotowski@europarl.europa.eu",
"lidiajoanna.geringerdeoedenberg@europarl.europa.eu",
"adam.gierek@europarl.europa.eu",
"boguslaw.liberadzki@europarl.europa.eu",
"krystyna.lybacka@europarl.europa.eu",
"janusz.zemke@europarl.europa.eu",
"michal.marusik@europarl.europa.eu",
"stanislawjozef.zoltek@europarl.europa.eu",
"robertjaroslaw.iwaszkiewicz@europarl.europa.eu",
"jacek.saryusz-wolski@europarl.europa.eu",
"dobromir.sosnierz@europarl.europa.eu",
"kazimierzmichal.ujazdowski@europarl.europa.eu")

$email = "email nadawcy"

$pass = "hasło"

$smtpServer = "smtp.gmail.com"

foreach ($addr in $list) {

$sendto = $addr

$msg = new-object Net.Mail.MailMessage
$smtp = new-object Net.Mail.SmtpClient($smtpServer)
$smtp.EnableSsl = $true
$msg.From = "$email"
$msg.To.Add("$addr")
$msg.BodyEncoding = [system.Text.Encoding]::Unicode
$msg.SubjectEncoding = [system.Text.Encoding]::Unicode
$msg.IsBodyHTML = $true
$msg.Subject = "Sprzeciw wobec planów filtrowania treści w Intenecie i tzw. podatku od linków"
$msg.Body = 'Szanowny Panie Pośle, Szanowna Pani Posłanko!
<br>
<br>
Głosowanie 20 czerwca w sprawie dyrektywy o prawie autorskim na jednolitym rynku cyfrowym może spowodować nieodwracalne szkody dla internetu, podstawowych praw i wolności na których zbudowane zostały nasze kraje i europejskiej ekonomii, jednocześnie tworząc niepewność prawną na kolejne dziesięciolecia. Dlatego ważne jest, aby 20 czerwca głosować  przeciwko kompromisowej poprawce do art. 13 sprawozdawcy Axela Vossa i za skreśleniem art. 13. Każdy głos w głosowaniu jest na wagę złota. Moja prośba spowodowana jest tym, że na podstawie wielu badań i raportów, art. 13 będzie bardzo szkodliwy dla:
<br>
<br>
Internet jako spójny system: ponad 70 osób zaangażowanych w powstanie internetu i ekspertów skierowało do Parlamentu Europejskiego list otwarty [1] 12 czerwca 2018 r., w którym wezwali do głosowania za skreśleniem art. 13 ze względu na przyszłość Internetu, ponieważ "art. 13 nakazuje platformom internetowym wbudowanie zautomatyzowanej infrastruktury do monitorowania i cenzury internetu".
<br>
<br>
Prawa podstawowe: ponad 50 organizacji pozarządowych broniących praw człowieka i wolność mediów skierowało do Parlamentu Europejskiego list otwarty [2] 16 października 2017 r. z prośbą o usunięcie art. 13, ponieważ "naruszałby on wolność słowa wyrażoną w (...) karcie Praw Podstawowych i wywoływał taką niepewność prawną, że platformy internetowe nie będą miały innego wyboru niż monitorowanie, filtrowanie i blokowanie komunikacji obywateli UE”.
<br>
<br>
Pewność prawa w UE: naukowcy z 25 wiodących ośrodków badawczych w zakresie własności intelektualnej w Europie opublikowali list otwarty [3] 26 kwietnia 2018 r. wskazując, że istnieje naukowe porozumienie co do faktu, że art. 13 "zagraża korzyściom dla użytkowników zagwarantowanym w dyrektywie o handlu elektronicznym (2000/31 / WE)". Natomiast 17 października 2017 r. 56 uznanych naukowców podpisało wspólnie stanowisko [4] ostrzegając, że art. 13 "zawiera niezdefiniowane koncepcje prawne, które czynią je niezgodnym z istniejącym porządkiem prawnym".
<br>
<br>
Gospodarka europejska: europejscy innowacyjni wydawcy mediów wyrazili [5] swoje obawy związane z artykułem 13 – uważają oni, że "te zasady są złą wiadomością dla wydawców, którzy polegają na otwartym i konkurencyjnym internecie w celu pozyskiwania, tworzenia i rozpowszechniania informacji wśród swoich czytelników". Allied for Startups wyjaśnia [6], że "proponowana technologia filtrowania zwiększy koszty uruchomienia startupów w Europie i odstraszy talenty".
<br>
<br>
Ponadto wprowadzenie proponowanej obligatoryjnej opłaty za umieszczanie we własnych utworach odnośników do innych źródeł będzie miało skutek odwrotny do zamierzonego, co udowiadniają nieudane próby podjęte w Niemczech i Hiszpanii.
<br>
<br>
W XXI wieku "twórcy" to nie tylko wydawcy gazet, producenci filmowi czy piosenkarze. W XXI wieku wszyscy ludzie są twórcami a więc prawo autorskie musi służyć wszystkim.<br>
<br>
Bardzo proszę nie lekceważyć tego głosu.
<br>
<br>
Dziękuję i pozdrawiam
<br>
<br>
<br>

[1] https://www.eff.org/files/2018/06/12/article13letter.pdf<br>
[2] https://www.liberties.eu/en/news/delete-article-thirteen-open-letter/13194<br>
[3] https://www.create.ac.uk/wp-content/uploads/2018/04/OpenLetter_EU_Copyright_Research_Centres_26_04_2018.pdf<br>
[4] https://papers.ssrn.com/sol3/papers.cfm?abstract_id=3054967<br>
[5] http://mediapublishers.eu/2017/11/18/members-voice-why-should-publishers-worry-about-article-13-of-the-copyright-reform/<br>
[6] http://www.thedigitalpost.eu/2017/channel-startup-economy/filtering-obligations-dont-torpedo-startups-in-europe<br>
'
$SMTP.Credentials = New-Object System.Net.NetworkCredential("$email", "$pass");
$smtp.Send($msg)

sleep -Seconds 5

}