summaryrefslogtreecommitdiff
path: root/http.fnl
diff options
context:
space:
mode:
Diffstat (limited to 'http.fnl')
-rw-r--r--http.fnl11
1 files changed, 11 insertions, 0 deletions
diff --git a/http.fnl b/http.fnl
new file mode 100644
index 0000000..fb208fc
--- /dev/null
+++ b/http.fnl
@@ -0,0 +1,11 @@
+(fn random-user-agent []
+ (let [agents ["Mozilla/5.0 (Macintosh; Intel Mac OS X 10_15_7) AppleWebKit/605.1.15 (KHTML, like Gecko) Version/17.5 Safari/605.1.1"
+ "Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/126.0.0.0 Safari/537.3"
+ "Mozilla/5.0 (Macintosh; Intel Mac OS X 10_15_7) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/126.0.0.0 Safari/537.3"
+ "Mozilla/5.0 (X11; Linux x86_64) AppleWebKit/537.36 (KHTML, like Gecko) SamsungBrowser/25.0 Chrome/121.0.0.0 Safari/537.3"
+ "Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/127.0.0.0 Safari/537.3"
+ "Mozilla/5.0 (X11; Linux x86_64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/127.0.0.0 Safari/537.3"]
+ idx (math.random 1 (# agents))]
+ (. agents idx)))
+
+{: random-user-agent}