Skip to content

Instantly share code, notes, and snippets.

View dex4er's full-sized avatar

Piotr Roszatycki dex4er

View GitHub Profile
#!/bin/bash
set -eu
set -o pipefail
shopt -s inherit_errexit
if [[ $# -lt 4 ]]; then
echo "Usage: $0 aws_profile_from aws_region_from aws_profile_to aws_region_to [shell patterns]"
exit 99
fi
#!/bin/bash
set -euo pipefail
shopt -s inherit_errexit 2>/dev/null || true
prefix=${prefix:-}
operation=${operation:-=}
while true; do
kubectl get node -L node.kubernetes.io/instance-type,eks.amazonaws.com/nodegroup,karpenter.sh/provisioner-name |
#!/usr/bin/env bash
FILE="$1"
if [[ -z $FILE ]]; then
echo "$0 run-XXX.mocks.tar.gz"
exit 1
fi
if command -v colordiff >/dev/null; then
@dex4er
dex4er / ssm.sh
Last active March 6, 2025 15:26
ssm
#!/usr/bin/env bash
## ssm
##
## Copyright (c) 2023 Piotr Roszatycki <[email protected]>, MIT
set -e
if ! command -v aws >/dev/null; then
echo "Needs aws command."
#!/usr/bin/env bash
## gitlab_clone_all.sh
##
## Copyright (c) 2023 Piotr Roszatycki <[email protected]>, MIT
##
## Requires curl and jq
GROUP_NAME="$1"
shift
#!/bin/bash
if [ -z "$1" ]; then
gcloud compute images list --project $PROJECT
else
gcloud compute images export --project $PROJECT \
--async \
--image "$1" \
--destination-uri "gs://$BUCKET/$1.vmdk" \
--export-format=vmdk \
git filter-branch --index-filter "cp $PWD/.gitattributes . && git add .gitattributes" --tag-name-filter cat --prune-empty -- --all
#!/usr/bin/perl
## The fake API service for OpenVPN that allows to use client with simple setup mode.
use Mojo::File;
use Mojo::Util 'xml_escape';
use Mojolicious::Lite;
post '/RPC2' => sub {
my ($c) = @_;
## Global Docker image parameters
## Please, note that this will override the image parameters, including dependencies, configured to use the global value
## Current available global Docker image parameters: imageRegistry and imagePullSecrets
##
global:
# imageRegistry: myRegistryName
# imagePullSecrets:
# - myRegistryKeySecretName
# storageClass: myStorageClass
labels: {}
kubectl get pod -o wide | perl -pe 's/\b (?! )\b/_/g' | q -H 'select node, count(*) from - group by node'