in reply to List drives in linux using Perl

How about `cat /proc/partitions` and go from there?