First mobile phone number (in Switzerland, number that begins with "+41 7") :

BEGIN:VCARD(.|\n)*?FN:(.*)?\n(.|\n)*?(TEL.*?:(\+41 7.*?)\n(.|\n)*?)?END:VCARD

$2;$5

Or first phone number :

BEGIN:VCARD(.|\n)*?FN:(.*)?\n(.|\n)*?(TEL.*?:(.*?)\n(.|\n)*?)?END:VCARD

$2;$5

This is the output :

John smith;+41 79 777 77 77
my name;my phone number

They may still be some escape character, you can remove them with this :

\\(.)

$1

If you want to remove those who don't have a phone number :

.*?;\n