Instantly convert code snippets from Perl to C++ with our free online code converter. Transform your code easily and accurately.
Run Claude Code in the cloud. Connect your GitHub repo, describe what you want to build, and let your AI developer implement it and create a pull request for you. All in the background.
GitHub Integration
Direct repo connection & PRs
Background Tasks
Parallel execution on branches
Secure & Isolated
Safe execution environments
Mobile Ready
Trigger tasks from anywhere
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