Your question does not seem to be related to Perl in any way.
You may add an udev rule the assigns the device(s) in question to a specific group and then run the script setgid to this group.
EDIT:
and then add an appropriate entry in /etc/fstab to allow a user-mount.
Greetings,
-jo
In reply to Re: mounting device from a script
by jo37
in thread mounting device from a script
by geoffleach
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |