#include <bits/stdc++.h>
using namespace std;
// Speed
#define fast_io ios::sync_with_stdio(0); cin.tie(0); cout.tie(0)
// Typedefs
#define int long long
#define pb push_back
#define ff first
#define ss second
#define all(x) (x).begin(), (x).end()
#define sz(x) ((int)(x).size())
#define endl '\n'
void solve() {
int n, m;
cin >> n >> m;
vector<pair<int, int>> a(n);
int sum_others = 0;
for(int i = 0; i < n; i++) {
cin >> a[i].ff;
a[i].ss = i + 1;
}
sort(all(a));
if (m == 0) {
int current_king_hp = a[n-1].ff;
for(int i = 0; i < n - 1; i++) sum_others += a[i].ff;
if (sum_others < current_king_hp) {
cout << -1 << endl;
return;
}
vector<pair<int, int>> moves;
for(int i = 0; i < n - 1; i++) {
if (i == n - 2) {
moves.pb({a[i].ss, a[n-1].ss});
}
else if (current_king_hp > a[i].ff) {
moves.pb({a[i].ss, a[n-1].ss});
current_king_hp -= a[i].ff;
}
else {
moves.pb({a[i].ss, a[i+1].ss});
}
}
cout << sz(moves) << endl;
for(auto p : moves) cout << p.ff << " " << p.ss << endl;
return;
}
if (n < 2 * m) {
cout << -1 << endl;
return;
}
vector<pair<int, int>> moves;
int trash_count = n - 2 * m;
int first_target_idx = n - 2 * m;
if (trash_count > 0) {
for (int i = 0; i < trash_count; i++) {
if (i == trash_count - 1) {
moves.pb({a[i].ss, a[first_target_idx].ss});
} else {
moves.pb({a[i].ss, a[i+1].ss});
}
}
}
for (int i = 0; i < m; i++) {
int target_idx = n - 2 * m + i;
int survivor_idx = n - m + i;
moves.pb({a[survivor_idx].ss, a[target_idx].ss});
}
cout << sz(moves) << endl;
for(auto p : moves) {
cout << p.ff << " " << p.ss << endl;
}
}
int32_t main() {
fast_io;
int t;
cin >> t;
while(t--) {
solve();
}
return 0;
}