Instantly convert code snippets from Perl to C++ with our free online code converter. Transform your code easily and accurately.
Perfect for vibe-coding with Cursor. Save 32+ hours of development time with Next.js, Supabase, Auth, Payments, and everything you need to launch faster.
Cursor Rules & MCP
AI-assisted development with Supabase MCP integration
Save 32+ Hours
Skip the boilerplate and focus on your product
Complete Backend
Supabase DB, Auth, Storage & Stripe payments
Lifetime Access
One-time payment, unlimited projects
We prioritize your code's security and privacy. Your code is not stored on our servers and is only temporarily processed for conversion. We use OpenAI's secure servers for the conversion process, ensuring your code remains confidential.
Perl is a family of two high-level, general-purpose, interpreted programming languages.
C++ is a general-purpose programming language created by Bjarne Stroustrup as an extension of the C programming language, or "C with Classes".
sub is_palindrome {
my $str = shift;
$str =~ s/[^a-zA-Z0-9]//g;
$str = lc($str);
return $str eq reverse($str);
}
# Example usage
print is_palindrome("A man, a plan, a canal: Panama") ? "true\n" : "false\n";
print is_palindrome("race a car") ? "true\n" : "false\n";
#include <iostream>
#include <string>
#include <algorithm>
using namespace std;
bool isPalindrome(string str) {
string clean;
// Keep alphanumeric chars and convert to lowercase
for(char c : str) {
if(isalnum(c)) {
clean += tolower(c);
}
}
string reversed = clean;
reverse(reversed.begin(), reversed.end());
return clean == reversed;
}
int main() {
cout << boolalpha;
cout << isPalindrome("A man, a plan, a canal: Panama") << endl; // true
cout << isPalindrome("race a car") << endl; // false
return 0;
}
sub bubble_sort {
my @arr = @_;
my $n = scalar @arr;
for my $i (0..$n-1) {
for my $j (0..$n-$i-2) {
if ($arr[$j] > $arr[$j+1]) {
@arr[$j,$j+1] = @arr[$j+1,$j];
}
}
}
return @arr;
}
my @arr = (64, 34, 25, 12, 22, 11, 90);
print join(" ", bubble_sort(@arr)) . "\n";
#include <iostream>
#include <vector>
using namespace std;
void bubbleSort(vector<int>& arr) {
int n = arr.size();
for(int i = 0; i < n; i++) {
for(int j = 0; j < n - i - 1; j++) {
if(arr[j] > arr[j + 1]) {
swap(arr[j], arr[j + 1]);
}
}
}
}
int main() {
vector<int> arr = {64, 34, 25, 12, 22, 11, 90};
bubbleSort(arr);
for(int num : arr) {
cout << num << " ";
}
return 0;
}
Convert Perl to Python
Open ConverterConvert Perl to JavaScript
Open ConverterConvert Perl to TypeScript
Open ConverterConvert Perl to Java
Open ConverterConvert Perl to C
Open ConverterConvert Perl to C#
Open ConverterConvert Perl to Go
Open ConverterConvert Perl to Dart
Open ConverterConvert Perl to Ruby
Open ConverterConvert Perl to Swift
Open ConverterConvert Perl to Kotlin
Open ConverterConvert Perl to Rust
Open ConverterConvert Perl to Scala
Open ConverterConvert Perl to PHP
Open ConverterConvert Perl to R
Open ConverterConvert Perl to Haskell
Open ConverterConvert Perl to Julia
Open ConverterConvert Perl to MATLAB
Open ConverterConvert Perl to Lua
Open ConverterConvert Perl to Assembly
Open ConverterConvert Perl to Groovy
Open ConverterConvert Perl to Elixir
Open ConverterConvert Perl to F#
Open ConverterConvert Perl to Clojure
Open ConverterConvert Perl to Delphi
Open Converter