diff --git a/package-updates-exporter.ros b/package-updates-exporter.ros
index 9dc4a4a..9eb4f94 100755
--- a/package-updates-exporter.ros
+++ b/package-updates-exporter.ros
@@ -40,10 +40,10 @@ exec ros -Q -- $0 "$@"
           (error "Unknown package manager: ~A" package-manager)))))
 
 (defun main (&rest argv)
-  (let* ((architecture (uiop:run-program "sh" :args '("-c" "uname -m | tr -d '\n'") :output :string))
+  (let* ((architecture (uiop:run-program '("uname" "-m") :output :string))
          (upgradable (get-upgradable *package-manager*)))
     (format t "# HELP ~a_upgrades_pending Packages pending updates by origin~%" *package-manager*)
     (format t "# TYPE ~a_upgrades_pending gauge~%" *package-manager*)
-    (format t "~a_package_pending_update{arch=\"~a\"} ~d~%" *package-manager* architecture upgradable)))
+    (format t "~a_package_pending_update{arch=\"~a\"} ~d~%" *package-manager* (string-trim '(#\Newline) architecture) upgradable)))
 
 ;;; vim: set ft=lisp lisp: